summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorJon Taylor <taylorj@ggi-project.org>1999-08-21 06:27:37 +0000
committerJon Taylor <taylorj@ggi-project.org>1999-08-21 06:27:37 +0000
commit035e96ec3cf25dfa39dcdacb0f0c7b57d9d2b85a (patch)
tree555a0433800d3e0603ea26d4197e996df2f1863d
parent95dcb43951b5d3c99514d1f2a50ea797217d328d (diff)
*** empty log message ***
-rw-r--r--progs/ggi/asc-view.c353
-rw-r--r--progs/ggi/blah2
-rw-r--r--progs/ggi/blat7
-rw-r--r--progs/ggi/box.asc66
-rw-r--r--progs/ggi/cone.asc198
-rw-r--r--progs/ggi/gears.c359
-rw-r--r--progs/ggi/gears2.c359
-rw-r--r--progs/ggi/sphere.asc132
-rw-r--r--progs/ggi/torus.asc264
-rw-r--r--progs/ggi/tube.asc396
-rw-r--r--src/glut/ggi/EXPSYMS2
-rw-r--r--src/glut/ggi/ggiglut.c840
12 files changed, 2978 insertions, 0 deletions
diff --git a/progs/ggi/asc-view.c b/progs/ggi/asc-view.c
new file mode 100644
index 0000000000..16f53e5509
--- /dev/null
+++ b/progs/ggi/asc-view.c
@@ -0,0 +1,353 @@
+/*
+ test program for the ggi-mesa driver
+
+ Copyright (C) 1997,1998 Uwe Maurer - uwe_maurer@t-online.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; if not, write to the Free Software
+ Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
+*/
+
+#include <sys/time.h>
+#include <stdio.h>
+#include <string.h>
+#include <math.h>
+#include <GL/gl.h>
+#include <GL/ggimesa.h>
+#include <ggi/ggi.h>
+#include <stdlib.h>
+
+ggi_visual_t vis,vis_mem;
+
+GGIMesaContext ctx;
+
+int screen_x=320,screen_y=200;
+ggi_graphtype bpp=GT_16BIT;
+
+//#define ZBUFFER
+
+//#define SMOOTH_NORMALS
+
+void Init()
+{
+ GLfloat h=(GLfloat)3/4;
+ GLfloat pos[4]={5,5,-20,0};
+ GLfloat specular[4]={.4,.4,.4,1};
+ GLfloat diffuse[4]={.3,.3,.3,1};
+ GLfloat ambient[4]={.2,.2,.2,1};
+
+ int err;
+
+ if (ggiInit()<0)
+ {
+ printf("ggiInit() failed\n");
+ exit(1);
+ }
+ ctx=GGIMesaCreateContext();
+ if (ctx==NULL)
+ {
+ printf("Can't create Context!\n");
+ exit(1);
+ }
+
+ vis=ggiOpen(NULL);
+ vis_mem=ggiOpen("display-memory",NULL);
+ if (vis==NULL || vis_mem==NULL)
+ {
+ printf("Can't open ggi_visuals!\n");
+ exit(1);
+ }
+ err=ggiSetGraphMode(vis,screen_x,screen_y,screen_x,screen_y,bpp);
+ err+=ggiSetGraphMode(vis_mem,screen_x,screen_y,screen_x,screen_y,bpp);
+ if (err)
+ {
+ printf("Can't set %ix%i\n",screen_x,screen_y);
+ exit(1);
+ }
+
+ if (GGIMesaSetVisual(ctx,vis_mem,GL_TRUE,GL_FALSE)<0)
+ {
+ printf("GGIMesaSetVisual() failed!\n");
+ exit(1);
+ }
+
+ GGIMesaMakeCurrent(ctx);
+
+ glViewport(0,0,screen_x,screen_y);
+ glMatrixMode(GL_PROJECTION);
+ glLoadIdentity();
+ glFrustum(-1,1,-h,h,1,50);
+ glMatrixMode(GL_MODELVIEW);
+ glLoadIdentity();
+ glTranslatef(0,0,-9);
+ glShadeModel(GL_FLAT);
+
+ glFrontFace(GL_CW);
+ glEnable(GL_CULL_FACE);
+ glEnable(GL_LIGHTING);
+ glEnable(GL_LIGHT0);
+
+ glLightfv(GL_LIGHT0,GL_POSITION,pos);
+
+ glLightfv(GL_LIGHT0,GL_DIFFUSE,diffuse);
+ glLightfv(GL_LIGHT0,GL_AMBIENT,ambient);
+ glLightfv(GL_LIGHT0,GL_SPECULAR,specular);
+
+ #ifdef ZBUFFER
+ glEnable(GL_DEPTH_TEST);
+ #endif
+}
+
+
+#define MAX_VERTS 1000
+#define MAX_TRIS 2000
+#define MAX_LEN 1024
+#define MAX_F 100000000
+
+void LoadAsc(GLuint *list,char *file)
+{
+ FILE *fp;
+
+ GLfloat p[MAX_VERTS][3];
+ GLfloat normal[MAX_VERTS][3];
+ float ncount[MAX_VERTS];
+ int v[MAX_TRIS][3];
+ char line[MAX_LEN];
+ char *s;
+ int i,j;
+ int verts,faces;
+ GLuint v0,v1,v2;
+ GLfloat n[3];
+ GLfloat len,k;
+ GLfloat min[3]={MAX_F,MAX_F,MAX_F};
+ GLfloat max[3]={-MAX_F,-MAX_F,-MAX_F};
+ char *coord_str[]={"X","Z","Y"};
+
+ fp=fopen(file,"r");
+ if (!fp)
+ {
+ printf("Can't open %s!\n",file);
+ exit(1);
+ }
+
+ while (strncmp(fgets(line,MAX_LEN,fp),"Tri-mesh",8)) ;
+
+ s=strstr(line,":")+1;
+ verts=atoi(s);
+ s=strstr(s,":")+1;
+ faces=atoi(s);
+
+ if (verts>MAX_VERTS)
+ {
+ printf("Too many vertices..\n");
+ exit(1);
+ }
+
+ while (strncmp(fgets(line,MAX_LEN,fp),"Vertex list",11)) ;
+
+ for (i=0;i<verts;i++)
+ {
+ while (strncmp(fgets(line,MAX_LEN,fp),"Vertex",6)) ;
+ for (j=0;j<3;j++)
+ {
+ s=strstr(line,coord_str[j])+2;
+ k=atoi(s);
+ if (k>max[j]) max[j]=k;
+ if (k<min[j]) min[j]=k;
+ p[i][j]=k;
+ }
+
+ }
+ len=0;
+ for (i=0;i<3;i++)
+ {
+ k=max[i]-min[i];
+ if (k>len) {len=k;j=i;}
+ n[i]=(max[i]+min[i])/2;
+ }
+
+ len/=2;
+
+ for (i=0;i<verts;i++)
+ {
+ for (j=0;j<3;j++)
+ {
+ p[i][j]-=n[j];
+ p[i][j]/=len;
+ }
+ }
+
+ *list=glGenLists(1);
+ glNewList(*list,GL_COMPILE);
+ glBegin(GL_TRIANGLES);
+
+ memset(ncount,0,sizeof(ncount));
+ memset(normal,0,sizeof(normal));
+
+ while (strncmp(fgets(line,MAX_LEN,fp),"Face list",9)) ;
+ for (i=0;i<faces;i++)
+ {
+ while (strncmp(fgets(line,MAX_LEN,fp),"Face",4)) ;
+ s=strstr(line,"A")+2;
+ v0=v[i][0]=atoi(s);
+ s=strstr(line,"B")+2;
+ v1=v[i][1]=atoi(s);
+ s=strstr(line,"C")+2;
+ v2=v[i][2]=atoi(s);
+ n[0]=((p[v1][1]-p[v0][1])*(p[v2][2]-p[v0][2])
+ - (p[v1][2]-p[v0][2])*(p[v2][1]-p[v0][1]));
+ n[1]=((p[v1][2]-p[v0][2])*(p[v2][0]-p[v0][0])
+ - (p[v1][0]-p[v0][0])*(p[v2][2]-p[v0][2]));
+ n[2]=((p[v1][0]-p[v0][0])*(p[v2][1]-p[v0][1])
+ - (p[v1][1]-p[v0][1])*(p[v2][0]-p[v0][0]));
+ len=n[0]*n[0]+n[1]*n[1]+n[2]*n[2];
+ len=sqrt(len);
+ n[0]/=len;
+ n[1]/=len;
+ n[2]/=len;
+ #ifdef SMOOTH_NORMALS
+ for (j=0;j<3;j++){
+ normal[v[i][j]][0]+=n[0];
+ normal[v[i][j]][1]+=n[1];
+ normal[v[i][j]][2]+=n[2];
+ ncount[v[i][j]]++;
+ }
+ #else
+ glNormal3fv(n);
+ for (j=0;j<3;j++)
+ glVertex3fv(p[v[i][j]]);
+ #endif
+ }
+
+ #ifdef SMOOTH_NORMALS
+ for (i=0;i<verts;i++) {
+ for (j=0;j<3;j++) {
+ normal[i][j]/=ncount[i];
+ }
+ }
+ for (i=0;i<faces;i++) {
+ for (j=0;j<3;j++) {
+ glNormal3f(normal[v[i][j]][0],
+ normal[v[i][j]][1],
+ normal[v[i][j]][2]);
+ glVertex3fv(p[v[i][j]]);
+ }
+ }
+ #endif
+
+ glEnd();
+ glEndList();
+ fclose(fp);
+}
+
+double Display(GLuint l,int *maxframes)
+{
+ int x,y;
+ GLfloat col[]={.25,0,.25,1};
+ int frames=0;
+ struct timeval start,stop;
+ double len;
+ GLfloat rotate=0;
+
+ gettimeofday(&start,NULL);
+
+
+ while(1)
+ {
+ glClearColor(0,0,0,0);
+ glClearIndex(0);
+
+ #ifdef ZBUFFER
+ glClear(GL_COLOR_BUFFER_BIT|GL_DEPTH_BUFFER_BIT);
+ #else
+ glClear(GL_COLOR_BUFFER_BIT);
+ #endif
+
+ glPushMatrix();
+
+ glRotatef(30,1,0,0);
+ glRotatef(rotate/10,0,0,1);
+ glTranslatef(-6,-4,0);
+ for (y=0;y<3;y++)
+ {
+ glPushMatrix();
+ for (x=0;x<5;x++)
+ {
+ glPushMatrix();
+ glRotatef(rotate,y+1,-x-1,0);
+
+ col[0]=(GLfloat)(x+1)/4;
+ col[1]=0;
+ col[2]=(GLfloat)(y+1)/2;
+ glMaterialfv(GL_FRONT,GL_AMBIENT,col);
+ glCallList(l);
+ glPopMatrix();
+ glTranslatef(3,0,0);
+ }
+ glPopMatrix();
+ glTranslatef(0,4,0);
+ }
+ glPopMatrix();
+ glFinish();
+
+ ggiPutBox(vis,0,0,screen_x,screen_y,ggiDBGetBuffer(vis,0)->read);
+ rotate+=10;
+ frames++;
+ if (frames==(*maxframes)) break;
+
+ if (ggiKbhit(vis))
+ {
+ *maxframes=frames;
+ break;
+ }
+ }
+
+ gettimeofday(&stop,NULL);
+ len=(double)(stop.tv_sec-start.tv_sec)+
+ (double)(stop.tv_usec-start.tv_usec)/1e6;
+ return len;
+}
+
+
+int main(int argc,char **argv)
+{
+ GLuint l;
+ char *file;
+ int maxframes=0;
+ double len;
+
+ Init();
+
+ file=(argc>1) ? argv[1] : "asc/box.asc";
+ if (argc>2) maxframes=atoi(argv[2]);
+
+ if (argc==1)
+ {
+ printf("usage: %s filename.asc\n",argv[0]);
+ }
+
+ LoadAsc(&l,file);
+
+ len=Display(l,&maxframes);
+
+ printf("\ttime: %.3f sec\n",len);
+ printf("\tframes: %i\n",maxframes);
+ printf("\tfps: %.3f \n",(double)maxframes/len);
+
+ GGIMesaDestroyContext(ctx);
+ ggiClose(vis);
+ ggiClose(vis_mem);
+ ggiExit();
+ return 0;
+}
+
diff --git a/progs/ggi/blah b/progs/ggi/blah
new file mode 100644
index 0000000000..2c1664d7d0
--- /dev/null
+++ b/progs/ggi/blah
@@ -0,0 +1,2 @@
+Terminating on signal 11
+
diff --git a/progs/ggi/blat b/progs/ggi/blat
new file mode 100644
index 0000000000..7ff64a9d10
--- /dev/null
+++ b/progs/ggi/blat
@@ -0,0 +1,7 @@
+#!/bin/sh
+
+function foobar() {
+ echo "foo!"
+}
+
+foobar
diff --git a/progs/ggi/box.asc b/progs/ggi/box.asc
new file mode 100644
index 0000000000..f8b23fd85a
--- /dev/null
+++ b/progs/ggi/box.asc
@@ -0,0 +1,66 @@
+Ambient light color: Red=0.039216 Green=0.039216 Blue=0.039216
+
+Named object: "Object01"
+Tri-mesh, Vertices: 8 Faces: 12
+Vertex list:
+Vertex 0: X: -20 Y: -19.999998 Z: 20.000002
+Vertex 1: X: 20 Y: -19.999998 Z: 20.000002
+Vertex 2: X: 20 Y: 20.000002 Z: 19.999998
+Vertex 3: X: -20 Y: 20.000002 Z: 19.999998
+Vertex 4: X: -20 Y: -20.000002 Z: -19.999998
+Vertex 5: X: 20 Y: -20.000002 Z: -19.999998
+Vertex 6: X: 20 Y: 19.999998 Z: -20.000002
+Vertex 7: X: -20 Y: 19.999998 Z: -20.000002
+Face list:
+Face 0: A:0 B:1 C:2 AB:1 BC:1 CA:0
+Smoothing: 1
+Face 1: A:0 B:2 C:3 AB:0 BC:1 CA:1
+Smoothing: 1
+Face 2: A:0 B:4 C:5 AB:1 BC:1 CA:0
+Smoothing: 2
+Face 3: A:0 B:5 C:1 AB:0 BC:1 CA:1
+Smoothing: 2
+Face 4: A:1 B:5 C:6 AB:1 BC:1 CA:0
+Smoothing: 3
+Face 5: A:1 B:6 C:2 AB:0 BC:1 CA:1
+Smoothing: 3
+Face 6: A:2 B:6 C:7 AB:1 BC:1 CA:0
+Smoothing: 4
+Face 7: A:2 B:7 C:3 AB:0 BC:1 CA:1
+Smoothing: 4
+Face 8: A:3 B:7 C:4 AB:1 BC:1 CA:0
+Smoothing: 5
+Face 9: A:3 B:4 C:0 AB:0 BC:1 CA:1
+Smoothing: 5
+Face 10: A:4 B:7 C:6 AB:1 BC:1 CA:0
+Smoothing: 6
+Face 11: A:4 B:6 C:5 AB:0 BC:1 CA:1
+Smoothing: 6
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+ Page 1
+
+
+
diff --git a/progs/ggi/cone.asc b/progs/ggi/cone.asc
new file mode 100644
index 0000000000..5c52285996
--- /dev/null
+++ b/progs/ggi/cone.asc
@@ -0,0 +1,198 @@
+Ambient light color: Red=0.039216 Green=0.039216 Blue=0.039216
+
+Named object: "Object01"
+Tri-mesh, Vertices: 34 Faces: 64
+Vertex list:
+Vertex 0: X: 60.167416 Y: -87.419525 Z: -53.3088
+Vertex 1: X: 76.70787 Y: -87.419518 Z: -29.84565
+Vertex 2: X: 83.0103 Y: -87.419518 Z: -1.838764
+Vertex 3: X: 78.115204 Y: -87.419518 Z: 26.448057
+Vertex 4: X: 62.767834 Y: -87.41951 Z: 50.708401
+Vertex 5: X: 39.304672 Y: -87.41951 Z: 67.248848
+Vertex 6: X: 11.297782 Y: -87.41951 Z: 73.551254
+Vertex 7: X: -16.989004 Y: -87.41951 Z: 68.656158
+Vertex 8: X: -41.249344 Y: -87.41951 Z: 53.308777
+Vertex 9: X: -57.789783 Y: -87.419518 Z: 29.845612
+Vertex 10: X: -64.092194 Y: -87.419518 Z: 1.838721
+Vertex 11: X: -59.197079 Y: -87.419518 Z: -26.448097
+Vertex 12: X: -43.849678 Y: -87.419525 Z: -50.708427
+Vertex 13: X: -20.386503 Y: -87.419525 Z: -67.248856
+Vertex 14: X: 7.62039 Y: -87.419525 Z: -73.551239
+Vertex 15: X: 35.907204 Y: -87.419525 Z: -68.656105
+Vertex 16: X: 101.684875 Y: 94.590591 Z: -96.955391
+Vertex 17: X: 131.767838 Y: 94.590591 Z: -54.281792
+Vertex 18: X: 143.230377 Y: 94.590599 Z: -3.344275
+Vertex 19: X: 134.327423 Y: 94.590607 Z: 48.102379
+Vertex 20: X: 106.414383 Y: 94.590607 Z: 92.225876
+Vertex 21: X: 63.740765 Y: 94.590607 Z: 122.3088
+Vertex 22: X: 12.803238 Y: 94.590614 Z: 133.771301
+Vertex 23: X: -38.643349 Y: 94.590607 Z: 124.868355
+Vertex 24: X: -82.766846 Y: 94.590607 Z: 96.955307
+Vertex 25: X: -112.849762 Y: 94.590607 Z: 54.281677
+Vertex 26: X: -124.312256 Y: 94.590599 Z: 3.344152
+Vertex 27: X: -115.409271 Y: 94.590591 Z: -48.102493
+Vertex 28: X: -87.496201 Y: 94.590591 Z: -92.225967
+Vertex 29: X: -44.822552 Y: 94.590591 Z: -122.308861
+Vertex 30: X: 6.114983 Y: 94.590584 Z: -133.771332
+Vertex 31: X: 57.561623 Y: 94.590591 Z: -124.868301
+Vertex 32: X: 9.459057 Y: -87.419518 Z: 0.000008
+Vertex 33: X: 9.459057 Y: 94.590599 Z: -0.000008
+Face list:
+Face 0: A:0 B:1 C:32 AB:1 BC:0 CA:0
+Smoothing: 1
+Face 1: A:1 B:2 C:32 AB:1 BC:0 CA:0
+Smoothing: 1
+Face 2: A:2 B:3 C:32 AB:1 BC:0 CA:0
+Smoothing: 1
+Face 3: A:3 B:4 C:32 AB:1 BC:0 CA:0
+Smoothing: 1
+Face 4: A:4 B:5 C:32 AB:1 BC:0 CA:0
+Smoothing: 1
+Face 5: A:5 B:6 C:32 AB:1 BC:0 CA:0
+Smoothing: 1
+Face 6: A:6 B:7 C:32 AB:1 BC:0 CA:0
+Smoothing: 1
+Face 7: A:7 B:8 C:32 AB:1 BC:0 CA:0
+Smoothing: 1
+Face 8: A:8 B:9 C:32 AB:1 BC:0 CA:0
+Smoothing: 1
+Face 9: A:9 B:10 C:32 AB:1 BC:0 CA:0
+Smoothing: 1
+Face 10: A:10 B:11 C:32 AB:1 BC:0 CA:0
+
+ Page 1
+
+
+
+Smoothing: 1
+Face 11: A:11 B:12 C:32 AB:1 BC:0 CA:0
+Smoothing: 1
+Face 12: A:12 B:13 C:32 AB:1 BC:0 CA:0
+Smoothing: 1
+Face 13: A:13 B:14 C:32 AB:1 BC:0 CA:0
+Smoothing: 1
+Face 14: A:14 B:15 C:32 AB:1 BC:0 CA:0
+Smoothing: 1
+Face 15: A:15 B:0 C:32 AB:1 BC:0 CA:0
+Smoothing: 1
+Face 16: A:0 B:16 C:17 AB:1 BC:1 CA:0
+Smoothing: 2
+Face 17: A:0 B:17 C:1 AB:0 BC:1 CA:1
+Smoothing: 2
+Face 18: A:1 B:17 C:18 AB:1 BC:1 CA:0
+Smoothing: 3
+Face 19: A:1 B:18 C:2 AB:0 BC:1 CA:1
+Smoothing: 3
+Face 20: A:2 B:18 C:19 AB:1 BC:1 CA:0
+Smoothing: 4
+Face 21: A:2 B:19 C:3 AB:0 BC:1 CA:1
+Smoothing: 4
+Face 22: A:3 B:19 C:20 AB:1 BC:1 CA:0
+Smoothing: 5
+Face 23: A:3 B:20 C:4 AB:0 BC:1 CA:1
+Smoothing: 5
+Face 24: A:4 B:20 C:21 AB:1 BC:1 CA:0
+Smoothing: 6
+Face 25: A:4 B:21 C:5 AB:0 BC:1 CA:1
+Smoothing: 6
+Face 26: A:5 B:21 C:22 AB:1 BC:1 CA:0
+Smoothing: 7
+Face 27: A:5 B:22 C:6 AB:0 BC:1 CA:1
+Smoothing: 7
+Face 28: A:6 B:22 C:23 AB:1 BC:1 CA:0
+Smoothing: 8
+Face 29: A:6 B:23 C:7 AB:0 BC:1 CA:1
+Smoothing: 8
+Face 30: A:7 B:23 C:24 AB:1 BC:1 CA:0
+Smoothing: 9
+Face 31: A:7 B:24 C:8 AB:0 BC:1 CA:1
+Smoothing: 9
+Face 32: A:8 B:24 C:25 AB:1 BC:1 CA:0
+Smoothing: 10
+Face 33: A:8 B:25 C:9 AB:0 BC:1 CA:1
+Smoothing: 10
+Face 34: A:9 B:25 C:26 AB:1 BC:1 CA:0
+Smoothing: 11
+Face 35: A:9 B:26 C:10 AB:0 BC:1 CA:1
+Smoothing: 11
+Face 36: A:10 B:26 C:27 AB:1 BC:1 CA:0
+Smoothing: 12
+Face 37: A:10 B:27 C:11 AB:0 BC:1 CA:1
+Smoothing: 12
+Face 38: A:11 B:27 C:28 AB:1 BC:1 CA:0
+Smoothing: 13
+Face 39: A:11 B:28 C:12 AB:0 BC:1 CA:1
+Smoothing: 13
+Face 40: A:12 B:28 C:29 AB:1 BC:1 CA:0
+Smoothing: 14
+
+ Page 2
+
+
+
+Face 41: A:12 B:29 C:13 AB:0 BC:1 CA:1
+Smoothing: 14
+Face 42: A:13 B:29 C:30 AB:1 BC:1 CA:0
+Smoothing: 15
+Face 43: A:13 B:30 C:14 AB:0 BC:1 CA:1
+Smoothing: 15
+Face 44: A:14 B:30 C:31 AB:1 BC:1 CA:0
+Smoothing: 16
+Face 45: A:14 B:31 C:15 AB:0 BC:1 CA:1
+Smoothing: 16
+Face 46: A:15 B:31 C:16 AB:1 BC:1 CA:0
+Smoothing: 17
+Face 47: A:15 B:16 C:0 AB:0 BC:1 CA:1
+Smoothing: 17
+Face 48: A:16 B:33 C:17 AB:0 BC:0 CA:1
+Smoothing: 18
+Face 49: A:17 B:33 C:18 AB:0 BC:0 CA:1
+Smoothing: 18
+Face 50: A:18 B:33 C:19 AB:0 BC:0 CA:1
+Smoothing: 18
+Face 51: A:19 B:33 C:20 AB:0 BC:0 CA:1
+Smoothing: 18
+Face 52: A:20 B:33 C:21 AB:0 BC:0 CA:1
+Smoothing: 18
+Face 53: A:21 B:33 C:22 AB:0 BC:0 CA:1
+Smoothing: 18
+Face 54: A:22 B:33 C:23 AB:0 BC:0 CA:1
+Smoothing: 18
+Face 55: A:23 B:33 C:24 AB:0 BC:0 CA:1
+Smoothing: 18
+Face 56: A:24 B:33 C:25 AB:0 BC:0 CA:1
+Smoothing: 18
+Face 57: A:25 B:33 C:26 AB:0 BC:0 CA:1
+Smoothing: 18
+Face 58: A:26 B:33 C:27 AB:0 BC:0 CA:1
+Smoothing: 18
+Face 59: A:27 B:33 C:28 AB:0 BC:0 CA:1
+Smoothing: 18
+Face 60: A:28 B:33 C:29 AB:0 BC:0 CA:1
+Smoothing: 18
+Face 61: A:29 B:33 C:30 AB:0 BC:0 CA:1
+Smoothing: 18
+Face 62: A:30 B:33 C:31 AB:0 BC:0 CA:1
+Smoothing: 18
+Face 63: A:31 B:33 C:16 AB:0 BC:0 CA:1
+Smoothing: 18
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+ Page 3
+
+
+
diff --git a/progs/ggi/gears.c b/progs/ggi/gears.c
new file mode 100644
index 0000000000..a6b5f7dda1
--- /dev/null
+++ b/progs/ggi/gears.c
@@ -0,0 +1,359 @@
+/* $Id: gears.c,v 1.1 1999/08/21 06:27:37 jtaylor Exp $ */
+
+/*
+ * 3-D gear wheels. This program is in the public domain.
+ *
+ * Brian Paul
+ */
+
+/* Conversion to GLUT by Mark J. Kilgard */
+
+/*
+ * $Log: gears.c,v $
+ * Revision 1.1 1999/08/21 06:27:37 jtaylor
+ * *** empty log message ***
+ *
+ * Revision 1.5 1999/07/31 21:51:09 jtaylor
+ * *** empty log message ***
+ *
+ * Revision 3.2 1999/06/03 17:07:36 brianp
+ * an extra quad was being drawn in front and back faces
+ *
+ * Revision 3.1 1998/11/03 02:49:10 brianp
+ * added fps output
+ *
+ * Revision 3.0 1998/02/14 18:42:29 brianp
+ * initial rev
+ *
+ */
+
+
+#include <math.h>
+#include <stdlib.h>
+#include <stdio.h>
+#include <GL/glut.h>
+
+#ifndef M_PI
+#define M_PI 3.14159265
+#endif
+
+static GLint T0 = 0;
+static GLint Frames = 0;
+
+
+/**
+
+ Draw a gear wheel. You'll probably want to call this function when
+ building a display list since we do a lot of trig here.
+
+ Input: inner_radius - radius of hole at center
+ outer_radius - radius at center of teeth
+ width - width of gear
+ teeth - number of teeth
+ tooth_depth - depth of tooth
+
+ **/
+
+static void
+gear(GLfloat inner_radius, GLfloat outer_radius, GLfloat width,
+ GLint teeth, GLfloat tooth_depth)
+{
+ GLint i;
+ GLfloat r0, r1, r2;
+ GLfloat angle, da;
+ GLfloat u, v, len;
+
+ r0 = inner_radius;
+ r1 = outer_radius - tooth_depth / 2.0;
+ r2 = outer_radius + tooth_depth / 2.0;
+
+ da = 2.0 * M_PI / teeth / 4.0;
+
+ glShadeModel(GL_FLAT);
+
+ glNormal3f(0.0, 0.0, 1.0);
+
+ /* draw front face */
+ glBegin(GL_QUAD_STRIP);
+ for (i = 0; i <= teeth; i++) {
+ angle = i * 2.0 * M_PI / teeth;
+ glVertex3f(r0 * cos(angle), r0 * sin(angle), width * 0.5);
+ glVertex3f(r1 * cos(angle), r1 * sin(angle), width * 0.5);
+ if (i < teeth) {
+ glVertex3f(r0 * cos(angle), r0 * sin(angle), width * 0.5);
+ glVertex3f(r1 * cos(angle + 3 * da), r1 * sin(angle + 3 * da), width * 0.5);
+ }
+ }
+ glEnd();
+
+ /* draw front sides of teeth */
+ glBegin(GL_QUADS);
+ da = 2.0 * M_PI / teeth / 4.0;
+ for (i = 0; i < teeth; i++) {
+ angle = i * 2.0 * M_PI / teeth;
+
+ glVertex3f(r1 * cos(angle), r1 * sin(angle), width * 0.5);
+ glVertex3f(r2 * cos(angle + da), r2 * sin(angle + da), width * 0.5);
+ glVertex3f(r2 * cos(angle + 2 * da), r2 * sin(angle + 2 * da), width * 0.5);
+ glVertex3f(r1 * cos(angle + 3 * da), r1 * sin(angle + 3 * da), width * 0.5);
+ }
+ glEnd();
+
+ glNormal3f(0.0, 0.0, -1.0);
+
+ /* draw back face */
+ glBegin(GL_QUAD_STRIP);
+ for (i = 0; i <= teeth; i++) {
+ angle = i * 2.0 * M_PI / teeth;
+ glVertex3f(r1 * cos(angle), r1 * sin(angle), -width * 0.5);
+ glVertex3f(r0 * cos(angle), r0 * sin(angle), -width * 0.5);
+ if (i < teeth) {
+ glVertex3f(r1 * cos(angle + 3 * da), r1 * sin(angle + 3 * da), -width * 0.5);
+ glVertex3f(r0 * cos(angle), r0 * sin(angle), -width * 0.5);
+ }
+ }
+ glEnd();
+
+ /* draw back sides of teeth */
+ glBegin(GL_QUADS);
+ da = 2.0 * M_PI / teeth / 4.0;
+ for (i = 0; i < teeth; i++) {
+ angle = i * 2.0 * M_PI / teeth;
+
+ glVertex3f(r1 * cos(angle + 3 * da), r1 * sin(angle + 3 * da), -width * 0.5);
+ glVertex3f(r2 * cos(angle + 2 * da), r2 * sin(angle + 2 * da), -width * 0.5);
+ glVertex3f(r2 * cos(angle + da), r2 * sin(angle + da), -width * 0.5);
+ glVertex3f(r1 * cos(angle), r1 * sin(angle), -width * 0.5);
+ }
+ glEnd();
+
+ /* draw outward faces of teeth */
+ glBegin(GL_QUAD_STRIP);
+ for (i = 0; i < teeth; i++) {
+ angle = i * 2.0 * M_PI / teeth;
+
+ glVertex3f(r1 * cos(angle), r1 * sin(angle), width * 0.5);
+ glVertex3f(r1 * cos(angle), r1 * sin(angle), -width * 0.5);
+ u = r2 * cos(angle + da) - r1 * cos(angle);
+ v = r2 * sin(angle + da) - r1 * sin(angle);
+ len = sqrt(u * u + v * v);
+ u /= len;
+ v /= len;
+ glNormal3f(v, -u, 0.0);
+ glVertex3f(r2 * cos(angle + da), r2 * sin(angle + da), width * 0.5);
+ glVertex3f(r2 * cos(angle + da), r2 * sin(angle + da), -width * 0.5);
+ glNormal3f(cos(angle), sin(angle), 0.0);
+ glVertex3f(r2 * cos(angle + 2 * da), r2 * sin(angle + 2 * da), width * 0.5);
+ glVertex3f(r2 * cos(angle + 2 * da), r2 * sin(angle + 2 * da), -width * 0.5);
+ u = r1 * cos(angle + 3 * da) - r2 * cos(angle + 2 * da);
+ v = r1 * sin(angle + 3 * da) - r2 * sin(angle + 2 * da);
+ glNormal3f(v, -u, 0.0);
+ glVertex3f(r1 * cos(angle + 3 * da), r1 * sin(angle + 3 * da), width * 0.5);
+ glVertex3f(r1 * cos(angle + 3 * da), r1 * sin(angle + 3 * da), -width * 0.5);
+ glNormal3f(cos(angle), sin(angle), 0.0);
+ }
+
+ glVertex3f(r1 * cos(0), r1 * sin(0), width * 0.5);
+ glVertex3f(r1 * cos(0), r1 * sin(0), -width * 0.5);
+
+ glEnd();
+
+ glShadeModel(GL_SMOOTH);
+
+ /* draw inside radius cylinder */
+ glBegin(GL_QUAD_STRIP);
+ for (i = 0; i <= teeth; i++) {
+ angle = i * 2.0 * M_PI / teeth;
+ glNormal3f(-cos(angle), -sin(angle), 0.0);
+ glVertex3f(r0 * cos(angle), r0 * sin(angle), -width * 0.5);
+ glVertex3f(r0 * cos(angle), r0 * sin(angle), width * 0.5);
+ }
+ glEnd();
+
+}
+
+static GLfloat view_rotx = 20.0, view_roty = 30.0, view_rotz = 0.0;
+static GLint gear1, gear2, gear3;
+static GLfloat angle = 0.0;
+
+static void
+draw(void)
+{
+ glClear(GL_COLOR_BUFFER_BIT | GL_DEPTH_BUFFER_BIT);
+
+ glPushMatrix();
+ glRotatef(view_rotx, 1.0, 0.0, 0.0);
+ glRotatef(view_roty, 0.0, 1.0, 0.0);
+ glRotatef(view_rotz, 0.0, 0.0, 1.0);
+
+ glPushMatrix();
+ glTranslatef(-3.0, -2.0, 0.0);
+ glRotatef(angle, 0.0, 0.0, 1.0);
+ glCallList(gear1);
+ glPopMatrix();
+
+ glPushMatrix();
+ glTranslatef(3.1, -2.0, 0.0);
+ glRotatef(-2.0 * angle - 9.0, 0.0, 0.0, 1.0);
+ glCallList(gear2);
+ glPopMatrix();
+
+ glPushMatrix();
+ glTranslatef(-3.1, 4.2, 0.0);
+ glRotatef(-2.0 * angle - 25.0, 0.0, 0.0, 1.0);
+ glCallList(gear3);
+ glPopMatrix();
+
+ glPopMatrix();
+
+ glutSwapBuffers();
+
+ Frames++;
+ {
+ GLint t = glutGet(GLUT_ELAPSED_TIME);
+ if (t - T0 >= 5000) {
+ GLfloat seconds = (t - T0) / 1000.0;
+ GLfloat fps = Frames / seconds;
+ printf("%d frames in %g seconds = %g FPS\n", Frames, seconds, fps);
+ T0 = t;
+ Frames = 0;
+ }
+ }
+}
+
+
+static void
+idle(void)
+{
+ angle += 2.0;
+ glutPostRedisplay();
+}
+
+/* change view angle, exit upon ESC */
+/* ARGSUSED1 */
+static void
+key(unsigned char k, int x, int y)
+{
+ switch (k) {
+ case 'z':
+ view_rotz += 5.0;
+ break;
+ case 'Z':
+ view_rotz -= 5.0;
+ break;
+ case 27: /* Escape */
+ exit(0);
+ break;
+ default:
+ return;
+ }
+ glutPostRedisplay();
+}
+
+/* change view angle */
+/* ARGSUSED1 */
+static void
+special(int k, int x, int y)
+{
+ switch (k) {
+ case GLUT_KEY_UP:
+ view_rotx += 5.0;
+ break;
+ case GLUT_KEY_DOWN:
+ view_rotx -= 5.0;
+ break;
+ case GLUT_KEY_LEFT:
+ view_roty += 5.0;
+ break;
+ case GLUT_KEY_RIGHT:
+ view_roty -= 5.0;
+ break;
+ default:
+ return;
+ }
+ glutPostRedisplay();
+}
+
+/* new window size or exposure */
+static void
+reshape(int width, int height)
+{
+ GLfloat h = (GLfloat) height / (GLfloat) width;
+
+ glViewport(0, 0, (GLint) width, (GLint) height);
+ glMatrixMode(GL_PROJECTION);
+ glLoadIdentity();
+ glFrustum(-1.0, 1.0, -h, h, 5.0, 60.0);
+ glMatrixMode(GL_MODELVIEW);
+ glLoadIdentity();
+ glTranslatef(0.0, 0.0, -40.0);
+}
+
+static void
+init(void)
+{
+ static GLfloat pos[4] =
+ {5.0, 5.0, 10.0, 0.0};
+ static GLfloat red[4] =
+ {0.8, 0.1, 0.0, 1.0};
+ static GLfloat green[4] =
+ {0.0, 0.8, 0.2, 1.0};
+ static GLfloat blue[4] =
+ {0.2, 0.2, 1.0, 1.0};
+
+ glLightfv(GL_LIGHT0, GL_POSITION, pos);
+ glEnable(GL_CULL_FACE);
+ glEnable(GL_LIGHTING);
+ glEnable(GL_LIGHT0);
+ glEnable(GL_DEPTH_TEST);
+
+ /* make the gears */
+ gear1 = glGenLists(1);
+ glNewList(gear1, GL_COMPILE);
+ glMaterialfv(GL_FRONT, GL_AMBIENT_AND_DIFFUSE, red);
+ gear(1.0, 4.0, 1.0, 20, 0.7);
+ glEndList();
+
+ gear2 = glGenLists(1);
+ glNewList(gear2, GL_COMPILE);
+ glMaterialfv(GL_FRONT, GL_AMBIENT_AND_DIFFUSE, green);
+ gear(0.5, 2.0, 2.0, 10, 0.7);
+ glEndList();
+
+ gear3 = glGenLists(1);
+ glNewList(gear3, GL_COMPILE);
+ glMaterialfv(GL_FRONT, GL_AMBIENT_AND_DIFFUSE, blue);
+ gear(1.3, 2.0, 0.5, 10, 0.7);
+ glEndList();
+
+ glEnable(GL_NORMALIZE);
+}
+
+void
+visible(int vis)
+{
+ if (vis == GLUT_VISIBLE)
+ glutIdleFunc(idle);
+ else
+ glutIdleFunc(NULL);
+}
+
+int main(int argc, char *argv[])
+{
+ glutInit(&argc, argv);
+ glutInitDisplayMode(GLUT_RGB | GLUT_DEPTH | GLUT_DOUBLE);
+
+ glutInitWindowPosition(0, 0);
+ glutInitWindowSize(300, 300);
+ glutCreateWindow("Gears");
+ init();
+
+ glutDisplayFunc(draw);
+ glutReshapeFunc(reshape);
+ glutKeyboardFunc(key);
+ glutSpecialFunc(special);
+ glutVisibilityFunc(visible);
+
+ glutMainLoop();
+ return 0; /* ANSI C requires main to return int. */
+}
diff --git a/progs/ggi/gears2.c b/progs/ggi/gears2.c
new file mode 100644
index 0000000000..1d1e10db54
--- /dev/null
+++ b/progs/ggi/gears2.c
@@ -0,0 +1,359 @@
+/* gears.c */
+
+/*
+ * 3-D gear wheels. This program is in the public domain.
+ *
+ * Brian Paul
+ * modified by Uwe Maurer (uwe_maurer@t-online.de)
+ */
+
+#include <string.h>
+#include <math.h>
+#include <stdlib.h>
+#include <ggi/ggi.h>
+#include <GL/ggimesa.h>
+#ifndef M_PI
+# define M_PI 3.14159265
+#endif
+
+
+ggi_visual_t vis;
+char text[100];
+
+/*
+ * Draw a gear wheel. You'll probably want to call this function when
+ * building a display list since we do a lot of trig here.
+ *
+ * Input: inner_radius - radius of hole at center
+ * outer_radius - radius at center of teeth
+ * width - width of gear
+ * teeth - number of teeth
+ * tooth_depth - depth of tooth
+ */
+static void gear( GLfloat inner_radius, GLfloat outer_radius, GLfloat width,
+ GLint teeth, GLfloat tooth_depth )
+{
+ GLint i;
+ GLfloat r0, r1, r2;
+ GLfloat angle, da;
+ GLfloat u, v, len;
+
+ r0 = inner_radius;
+ r1 = outer_radius - tooth_depth/2.0;
+ r2 = outer_radius + tooth_depth/2.0;
+
+ da = 2.0*M_PI / teeth / 4.0;
+
+ glShadeModel( GL_FLAT );
+
+ glNormal3f( 0.0, 0.0, 1.0 );
+
+ /* draw front face */
+ glBegin( GL_QUAD_STRIP );
+ for (i=0;i<=teeth;i++) {
+ angle = i * 2.0*M_PI / teeth;
+ glVertex3f( r0*cos(angle), r0*sin(angle), width*0.5 );
+ glVertex3f( r1*cos(angle), r1*sin(angle), width*0.5 );
+ glVertex3f( r0*cos(angle), r0*sin(angle), width*0.5 );
+ glVertex3f( r1*cos(angle+3*da), r1*sin(angle+3*da), width*0.5 );
+ }
+ glEnd();
+
+ /* draw front sides of teeth */
+ glBegin( GL_QUADS );
+ da = 2.0*M_PI / teeth / 4.0;
+ for (i=0;i<teeth;i++) {
+ angle = i * 2.0*M_PI / teeth;
+
+ glVertex3f( r1*cos(angle), r1*sin(angle), width*0.5 );
+ glVertex3f( r2*cos(angle+da), r2*sin(angle+da), width*0.5 );
+ glVertex3f( r2*cos(angle+2*da), r2*sin(angle+2*da), width*0.5 );
+ glVertex3f( r1*cos(angle+3*da), r1*sin(angle+3*da), width*0.5 );
+ }
+ glEnd();
+
+
+ glNormal3f( 0.0, 0.0, -1.0 );
+
+ /* draw back face */
+ glBegin( GL_QUAD_STRIP );
+ for (i=0;i<=teeth;i++) {
+ angle = i * 2.0*M_PI / teeth;
+ glVertex3f( r1*cos(angle), r1*sin(angle), -width*0.5 );
+ glVertex3f( r0*cos(angle), r0*sin(angle), -width*0.5 );
+ glVertex3f( r1*cos(angle+3*da), r1*sin(angle+3*da), -width*0.5 );
+ glVertex3f( r0*cos(angle), r0*sin(angle), -width*0.5 );
+ }
+ glEnd();
+
+ /* draw back sides of teeth */
+ glBegin( GL_QUADS );
+ da = 2.0*M_PI / teeth / 4.0;
+ for (i=0;i<teeth;i++) {
+ angle = i * 2.0*M_PI / teeth;
+
+ glVertex3f( r1*cos(angle+3*da), r1*sin(angle+3*da), -width*0.5 );
+ glVertex3f( r2*cos(angle+2*da), r2*sin(angle+2*da), -width*0.5 );
+ glVertex3f( r2*cos(angle+da), r2*sin(angle+da), -width*0.5 );
+ glVertex3f( r1*cos(angle), r1*sin(angle), -width*0.5 );
+ }
+ glEnd();
+
+
+ /* draw outward faces of teeth */
+ glBegin( GL_QUAD_STRIP );
+ for (i=0;i<teeth;i++) {
+ angle = i * 2.0*M_PI / teeth;
+
+ glVertex3f( r1*cos(angle), r1*sin(angle), width*0.5 );
+ glVertex3f( r1*cos(angle), r1*sin(angle), -width*0.5 );
+ u = r2*cos(angle+da) - r1*cos(angle);
+ v = r2*sin(angle+da) - r1*sin(angle);
+ len = sqrt( u*u + v*v );
+ u /= len;
+ v /= len;
+ glNormal3f( v, -u, 0.0 );
+ glVertex3f( r2*cos(angle+da), r2*sin(angle+da), width*0.5 );
+ glVertex3f( r2*cos(angle+da), r2*sin(angle+da), -width*0.5 );
+ glNormal3f( cos(angle), sin(angle), 0.0 );
+ glVertex3f( r2*cos(angle+2*da), r2*sin(angle+2*da), width*0.5 );
+ glVertex3f( r2*cos(angle+2*da), r2*sin(angle+2*da), -width*0.5 );
+ u = r1*cos(angle+3*da) - r2*cos(angle+2*da);
+ v = r1*sin(angle+3*da) - r2*sin(angle+2*da);
+ glNormal3f( v, -u, 0.0 );
+ glVertex3f( r1*cos(angle+3*da), r1*sin(angle+3*da), width*0.5 );
+ glVertex3f( r1*cos(angle+3*da), r1*sin(angle+3*da), -width*0.5 );
+ glNormal3f( cos(angle), sin(angle), 0.0 );
+ }
+
+ glVertex3f( r1*cos(0), r1*sin(0), width*0.5 );
+ glVertex3f( r1*cos(0), r1*sin(0), -width*0.5 );
+
+ glEnd();
+
+
+ glShadeModel( GL_SMOOTH );
+
+ /* draw inside radius cylinder */
+ glBegin( GL_QUAD_STRIP );
+ for (i=0;i<=teeth;i++) {
+ angle = i * 2.0*M_PI / teeth;
+ glNormal3f( -cos(angle), -sin(angle), 0.0 );
+ glVertex3f( r0*cos(angle), r0*sin(angle), -width*0.5 );
+ glVertex3f( r0*cos(angle), r0*sin(angle), width*0.5 );
+ }
+ glEnd();
+
+}
+
+
+static GLfloat view_rotx=20.0, view_roty=30.0, view_rotz=0.0;
+static GLint gear1, gear2, gear3;
+static GLfloat angle = 0.0;
+
+static GLuint limit;
+static GLuint count = 1;
+
+
+static void draw( void )
+{
+ glClearColor(0,0,0,0);
+ glClearIndex(0);
+ glClear( GL_COLOR_BUFFER_BIT | GL_DEPTH_BUFFER_BIT );
+
+ glPushMatrix();
+ glRotatef( view_rotx, 1.0, 0.0, 0.0 );
+ glRotatef( view_roty, 0.0, 1.0, 0.0 );
+ glRotatef( view_rotz, 0.0, 0.0, 1.0 );
+
+ glPushMatrix();
+ glTranslatef( -3.0, -2.0, 0.0 );
+ glRotatef( angle, 0.0, 0.0, 1.0 );
+ glCallList(gear1);
+ glPopMatrix();
+
+ glPushMatrix();
+ glTranslatef( 3.1, -2.0, 0.0 );
+ glRotatef( -2.0*angle-9.0, 0.0, 0.0, 1.0 );
+ glCallList(gear2);
+ glPopMatrix();
+
+ glPushMatrix();
+ glTranslatef( -3.1, 4.2, 0.0 );
+ glRotatef( -2.0*angle-25.0, 0.0, 0.0, 1.0 );
+ glCallList(gear3);
+ glPopMatrix();
+
+ glPopMatrix();
+ glFlush();
+ glFinish();
+
+#if 0
+ ggiSetGCForeground(vis,255);
+ ggiPuts(vis,0,0,"Mesa -> GGI");
+ ggiPuts(vis,0,ggiGetInfo(vis)->mode->visible.y," Mesa -> GGI");
+
+ ggiPuts(vis,0,16,text);
+ ggiPuts(vis,0,ggiGetInfo(vis)->mode->visible.y+16,text);
+#endif
+
+ GGIMesaSwapBuffers();
+
+ count++;
+ if (count==limit) {
+ exit(1);
+ }
+}
+
+static void idle( void )
+{
+ angle += 2.0;
+ draw();
+}
+
+/* new window size or exposure */
+static void reshape( int width, int height )
+{
+ GLfloat h = (GLfloat) height / (GLfloat) width;
+
+ glViewport(0, 0, (GLint)width, (GLint)height);
+ glMatrixMode(GL_PROJECTION);
+ glLoadIdentity();
+ glFrustum( -1.0, 1.0, -h, h, 5.0, 60.0 );
+ glMatrixMode(GL_MODELVIEW);
+ glLoadIdentity();
+ glTranslatef( 0.0, 0.0, -40.0 );
+ glClear( GL_COLOR_BUFFER_BIT | GL_DEPTH_BUFFER_BIT );
+
+}
+
+
+static void init( void )
+{
+ static GLfloat pos[4] = {5.0, 5.0, 10.0, 0.0 };
+ static GLfloat red[4] = {0.8, 0.1, 0.0, 1.0 };
+ static GLfloat green[4] = {0.0, 0.8, 0.2, 1.0 };
+ static GLfloat blue[4] = {0.2, 0.2, 1.0, 1.0 };
+
+ glLightfv( GL_LIGHT0, GL_POSITION, pos );
+ glEnable( GL_CULL_FACE );
+ glEnable( GL_LIGHTING );
+ glEnable( GL_LIGHT0 );
+ glEnable( GL_DEPTH_TEST );
+
+ /* make the gears */
+ gear1 = glGenLists(1);
+ glNewList(gear1, GL_COMPILE);
+ glMaterialfv( GL_FRONT, GL_AMBIENT_AND_DIFFUSE, red );
+ glIndexi(1);
+ gear( 1.0, 4.0, 1.0, 20, 0.7 );
+ glEndList();
+
+ gear2 = glGenLists(1);
+ glNewList(gear2, GL_COMPILE);
+ glMaterialfv( GL_FRONT, GL_AMBIENT_AND_DIFFUSE, green );
+ glIndexi(2);
+ gear( 0.5, 2.0, 2.0, 10, 0.7 );
+ glEndList();
+
+ gear3 = glGenLists(1);
+ glNewList(gear3, GL_COMPILE);
+ glMaterialfv( GL_FRONT, GL_AMBIENT_AND_DIFFUSE, blue );
+ glIndexi(3);
+ gear( 1.3, 2.0, 0.5, 10, 0.7 );
+ glEndList();
+
+ glEnable( GL_NORMALIZE );
+}
+
+static void usage(char *s)
+{
+ printf("%s visible_x visible_y virtual_x virtual_y bpp db_flag\n",s);
+ printf("example:\n");
+ printf("%s 320 200 320 400 8 1\n",s);
+ exit(1);
+}
+
+int main( int argc, char *argv[] )
+{
+ GGIMesaContext ctx;
+ int vis_x,vis_y,vir_x,vir_y,bpp,db_flag,gt;
+ ggi_mode mode;
+
+ limit=0;
+
+ if (argc<7) usage(argv[0]);
+
+ vis_x=atoi(argv[1]);
+ vis_y=atoi(argv[2]);
+ vir_x=atoi(argv[3]);
+ vir_y=atoi(argv[4]);
+ bpp=atoi(argv[5]);
+ db_flag=atoi(argv[6]);
+
+ switch(bpp)
+ {
+ case 4: gt=GT_4BIT;break;
+ case 8: gt=GT_8BIT;break;
+ case 15:gt=GT_15BIT;break;
+ case 16:gt=GT_16BIT;break;
+ case 24:gt=GT_24BIT;break;
+ case 32:gt=GT_32BIT;break;
+ default:
+ printf("%i Bits per Pixel ???\n",bpp);
+ exit(1);
+ }
+ sprintf(text,"%sx%s %i colors, RGB mode, %s",
+ argv[1],argv[2],1<<bpp,
+ (db_flag) ? "doublebuffer" : "no doublebuffer");
+
+ if (ggiInit()<0)
+ {
+ printf("ggiInit() failed\n");
+ exit(1);
+ }
+
+ ctx=GGIMesaCreateContext();
+ if (ctx==NULL)
+ {
+ printf("GGIMesaCreateContext() failed\n");
+ exit(1);
+ }
+
+ vis=ggiOpen(NULL);
+ if (vis==NULL)
+ {
+ printf("ggiOpen() failed\n");
+ exit(1);
+ }
+
+ if (ggiSetGraphMode(vis,vis_x,vis_y,vir_x,vir_y,gt)<0)
+ {
+ printf("%s: can't set graphmode (%i %i %i %i) %i BPP\n",
+ argv[0],vis_x,vis_y,vir_x,vir_y,bpp);
+ exit(1);
+ }
+
+ if (GGIMesaSetVisual(ctx,vis,GL_TRUE,db_flag)<0)
+ {
+ printf ("GGIMesaSetVisual() failed\n");
+ exit(1);
+ }
+
+ GGIMesaMakeCurrent(ctx);
+ ggiGetMode(vis,&mode);
+
+ reshape(mode.visible.x,mode.visible.y);
+
+ init();
+
+ while (!ggiKbhit(vis)) idle();
+
+ GGIMesaDestroyContext(ctx);
+ ggiClose(vis);
+
+ printf("%s\n",text);
+
+ ggiExit();
+ return 0;
+}
diff --git a/progs/ggi/sphere.asc b/progs/ggi/sphere.asc
new file mode 100644
index 0000000000..1424a740d7
--- /dev/null
+++ b/progs/ggi/sphere.asc
@@ -0,0 +1,132 @@
+Ambient light color: Red=0.039216 Green=0.039216 Blue=0.039216
+
+Named object: "Object01"
+Tri-mesh, Vertices: 20 Faces: 36
+Vertex list:
+Vertex 0: X: -210 Y: -432.781738 Z: 180.000031
+Vertex 1: X: -610.810303 Y: 144.260559 Z: 103.580154
+Vertex 2: X: 56.586655 Y: 144.260544 Z: -128.902023
+Vertex 3: X: -75.776352 Y: 144.260605 Z: 565.321838
+Vertex 4: X: -462.815979 Y: -347.937683 Z: 131.797302
+Vertex 5: X: -616.506042 Y: -126.67173 Z: 102.494209
+Vertex 6: X: -41.847229 Y: -347.937683 Z: -14.843644
+Vertex 7: X: 60.375015 Y: -126.671753 Z: -133.291641
+Vertex 8: X: -125.336807 Y: -347.937653 Z: 423.046448
+Vertex 9: X: -73.868958 Y: -126.671692 Z: 570.797424
+Vertex 10: X: -448.353271 Y: 237.304672 Z: -92.34951
+Vertex 11: X: -192.440964 Y: 237.304672 Z: -181.494431
+Vertex 12: X: 145.038193 Y: 237.304672 Z: 109.754745
+Vertex 13: X: 94.283768 Y: 237.304688 Z: 375.953766
+Vertex 14: X: -326.684937 Y: 237.304733 Z: 522.594727
+Vertex 15: X: -531.842834 Y: 237.304718 Z: 345.540588
+Vertex 16: X: -331.419525 Y: -225.964966 Z: -168.564438
+Vertex 17: X: 152.575485 Y: -225.964935 Z: 249.129868
+Vertex 18: X: -451.155914 Y: -225.964905 Z: 459.434662
+Vertex 19: X: -298.413483 Y: 423.31897 Z: 163.142761
+Face list:
+Face 0: A:0 B:4 C:6 AB:1 BC:1 CA:1
+Face 1: A:4 B:5 C:16 AB:1 BC:1 CA:1
+Face 2: A:4 B:16 C:6 AB:1 BC:1 CA:1
+Face 3: A:6 B:16 C:7 AB:1 BC:1 CA:1
+Face 4: A:5 B:1 C:10 AB:1 BC:1 CA:1
+Face 5: A:5 B:10 C:16 AB:1 BC:1 CA:1
+Face 6: A:16 B:10 C:11 AB:1 BC:1 CA:1
+Face 7: A:16 B:11 C:7 AB:1 BC:1 CA:1
+Face 8: A:7 B:11 C:2 AB:1 BC:1 CA:1
+Face 9: A:0 B:6 C:8 AB:1 BC:1 CA:1
+Face 10: A:6 B:7 C:17 AB:1 BC:1 CA:1
+Face 11: A:6 B:17 C:8 AB:1 BC:1 CA:1
+Face 12: A:8 B:17 C:9 AB:1 BC:1 CA:1
+Face 13: A:7 B:2 C:12 AB:1 BC:1 CA:1
+Face 14: A:7 B:12 C:17 AB:1 BC:1 CA:1
+Face 15: A:17 B:12 C:13 AB:1 BC:1 CA:1
+Face 16: A:17 B:13 C:9 AB:1 BC:1 CA:1
+Face 17: A:9 B:13 C:3 AB:1 BC:1 CA:1
+Face 18: A:0 B:8 C:4 AB:1 BC:1 CA:1
+Face 19: A:8 B:9 C:18 AB:1 BC:1 CA:1
+Face 20: A:8 B:18 C:4 AB:1 BC:1 CA:1
+Face 21: A:4 B:18 C:5 AB:1 BC:1 CA:1
+Face 22: A:9 B:3 C:14 AB:1 BC:1 CA:1
+Face 23: A:9 B:14 C:18 AB:1 BC:1 CA:1
+Face 24: A:18 B:14 C:15 AB:1 BC:1 CA:1
+Face 25: A:18 B:15 C:5 AB:1 BC:1 CA:1
+Face 26: A:5 B:15 C:1 AB:1 BC:1 CA:1
+Face 27: A:1 B:15 C:10 AB:1 BC:1 CA:1
+Face 28: A:15 B:14 C:19 AB:1 BC:1 CA:1
+Face 29: A:15 B:19 C:10 AB:1 BC:1 CA:1
+Face 30: A:10 B:19 C:11 AB:1 BC:1 CA:1
+Face 31: A:14 B:3 C:13 AB:1 BC:1 CA:1
+Face 32: A:14 B:13 C:19 AB:1 BC:1 CA:1
+Face 33: A:19 B:13 C:12 AB:1 BC:1 CA:1
+Face 34: A:19 B:12 C:11 AB:1 BC:1 CA:1
+
+ Page 1
+
+
+
+Face 35: A:11 B:12 C:2 AB:1 BC:1 CA:1
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+ Page 2
+
+
+
diff --git a/progs/ggi/torus.asc b/progs/ggi/torus.asc
new file mode 100644
index 0000000000..6bd41f4033
--- /dev/null
+++ b/progs/ggi/torus.asc
@@ -0,0 +1,264 @@
+Ambient light color: Red=0.039216 Green=0.039216 Blue=0.039216
+
+Named object: "Object01"
+Tri-mesh, Vertices: 40 Faces: 80
+Vertex list:
+Vertex 0: X: -50.170624 Y: -0.000026 Z: -240.147842
+Vertex 1: X: -80.584503 Y: -63.958851 Z: -205.014572
+Vertex 2: X: -129.795166 Y: -39.528744 Z: -148.16774
+Vertex 3: X: -129.795166 Y: 39.528721 Z: -148.16774
+Vertex 4: X: -80.584503 Y: 63.958797 Z: -205.014572
+Vertex 5: X: 85.963654 Y: -0.000002 Z: 31.490465
+Vertex 6: X: 39.614838 Y: -63.958828 Z: 34.827602
+Vertex 7: X: -35.37915 Y: -39.528728 Z: 40.227196
+Vertex 8: X: -35.37912 Y: 39.528736 Z: 40.227188
+Vertex 9: X: 39.614838 Y: 63.95882 Z: 34.827595
+Vertex 10: X: -9.852051 Y: 0.000023 Z: 319.829254
+Vertex 11: X: -44.985352 Y: -63.958805 Z: 289.415405
+Vertex 12: X: -101.832199 Y: -39.528709 Z: 240.204758
+Vertex 13: X: -101.832184 Y: 39.528755 Z: 240.204773
+Vertex 14: X: -44.985352 Y: 63.958843 Z: 289.415405
+Vertex 15: X: -281.490326 Y: 0.000035 Z: 455.963654
+Vertex 16: X: -284.827484 Y: -63.958794 Z: 409.614868
+Vertex 17: X: -290.227112 Y: -39.528702 Z: 334.62085
+Vertex 18: X: -290.227112 Y: 39.528763 Z: 334.62088
+Vertex 19: X: -284.827484 Y: 63.958855 Z: 409.614838
+Vertex 20: X: -569.829163 Y: 0.000026 Z: 360.14798
+Vertex 21: X: -539.415344 Y: -63.958801 Z: 325.014709
+Vertex 22: X: -490.204712 Y: -39.528709 Z: 268.167847
+Vertex 23: X: -490.204712 Y: 39.528755 Z: 268.167847
+Vertex 24: X: -539.415344 Y: 63.958847 Z: 325.014679
+Vertex 25: X: -705.963684 Y: 0.000002 Z: 88.509598
+Vertex 26: X: -659.614807 Y: -63.958824 Z: 85.172462
+Vertex 27: X: -584.62085 Y: -39.528725 Z: 79.77285
+Vertex 28: X: -584.62085 Y: 39.52874 Z: 79.77285
+Vertex 29: X: -659.614868 Y: 63.958824 Z: 85.172447
+Vertex 30: X: -610.147827 Y: -0.000023 Z: -199.829361
+Vertex 31: X: -575.014587 Y: -63.958847 Z: -169.415497
+Vertex 32: X: -518.167725 Y: -39.528744 Z: -120.204819
+Vertex 33: X: -518.167725 Y: 39.528721 Z: -120.204834
+Vertex 34: X: -575.014587 Y: 63.958801 Z: -169.415497
+Vertex 35: X: -338.509338 Y: -0.000035 Z: -335.963745
+Vertex 36: X: -335.172241 Y: -63.958858 Z: -289.614868
+Vertex 37: X: -329.772675 Y: -39.528751 Z: -214.620865
+Vertex 38: X: -329.772675 Y: 39.528713 Z: -214.620865
+Vertex 39: X: -335.172241 Y: 63.95879 Z: -289.614899
+Face list:
+Face 0: A:0 B:6 C:1 AB:0 BC:1 CA:1
+Smoothing: 1
+Face 1: A:0 B:5 C:6 AB:1 BC:1 CA:0
+Smoothing: 1
+Face 2: A:1 B:7 C:2 AB:0 BC:1 CA:1
+Smoothing: 2
+Face 3: A:1 B:6 C:7 AB:1 BC:1 CA:0
+Smoothing: 2
+Face 4: A:2 B:8 C:3 AB:0 BC:1 CA:1
+Smoothing: 3
+Face 5: A:2 B:7 C:8 AB:1 BC:1 CA:0
+Smoothing: 3
+Face 6: A:3 B:9 C:4 AB:0 BC:1 CA:1
+Smoothing: 4
+Face 7: A:3 B:8 C:9 AB:1 BC:1 CA:0
+
+ Page 1
+
+
+
+Smoothing: 4
+Face 8: A:4 B:5 C:0 AB:0 BC:1 CA:1
+Smoothing: 5
+Face 9: A:4 B:9 C:5 AB:1 BC:1 CA:0
+Smoothing: 5
+Face 10: A:5 B:11 C:6 AB:0 BC:1 CA:1
+Smoothing: 6
+Face 11: A:5 B:10 C:11 AB:1 BC:1 CA:0
+Smoothing: 6
+Face 12: A:6 B:12 C:7 AB:0 BC:1 CA:1
+Smoothing: 7
+Face 13: A:6 B:11 C:12 AB:1 BC:1 CA:0
+Smoothing: 7
+Face 14: A:7 B:13 C:8 AB:0 BC:1 CA:1
+Smoothing: 8
+Face 15: A:7 B:12 C:13 AB:1 BC:1 CA:0
+Smoothing: 8
+Face 16: A:8 B:14 C:9 AB:0 BC:1 CA:1
+Smoothing: 9
+Face 17: A:8 B:13 C:14 AB:1 BC:1 CA:0
+Smoothing: 9
+Face 18: A:9 B:10 C:5 AB:0 BC:1 CA:1
+Smoothing: 10
+Face 19: A:9 B:14 C:10 AB:1 BC:1 CA:0
+Smoothing: 10
+Face 20: A:10 B:16 C:11 AB:0 BC:1 CA:1
+Smoothing: 11
+Face 21: A:10 B:15 C:16 AB:1 BC:1 CA:0
+Smoothing: 11
+Face 22: A:11 B:17 C:12 AB:0 BC:1 CA:1
+Smoothing: 12
+Face 23: A:11 B:16 C:17 AB:1 BC:1 CA:0
+Smoothing: 12
+Face 24: A:12 B:18 C:13 AB:0 BC:1 CA:1
+Smoothing: 13
+Face 25: A:12 B:17 C:18 AB:1 BC:1 CA:0
+Smoothing: 13
+Face 26: A:13 B:19 C:14 AB:0 BC:1 CA:1
+Smoothing: 14
+Face 27: A:13 B:18 C:19 AB:1 BC:1 CA:0
+Smoothing: 14
+Face 28: A:14 B:15 C:10 AB:0 BC:1 CA:1
+Smoothing: 15
+Face 29: A:14 B:19 C:15 AB:1 BC:1 CA:0
+Smoothing: 15
+Face 30: A:15 B:21 C:16 AB:0 BC:1 CA:1
+Smoothing: 16
+Face 31: A:15 B:20 C:21 AB:1 BC:1 CA:0
+Smoothing: 16
+Face 32: A:16 B:22 C:17 AB:0 BC:1 CA:1
+Smoothing: 17
+Face 33: A:16 B:21 C:22 AB:1 BC:1 CA:0
+Smoothing: 17
+Face 34: A:17 B:23 C:18 AB:0 BC:1 CA:1
+Smoothing: 18
+Face 35: A:17 B:22 C:23 AB:1 BC:1 CA:0
+Smoothing: 18
+Face 36: A:18 B:24 C:19 AB:0 BC:1 CA:1
+Smoothing: 19
+Face 37: A:18 B:23 C:24 AB:1 BC:1 CA:0
+Smoothing: 19
+
+ Page 2
+
+
+
+Face 38: A:19 B:20 C:15 AB:0 BC:1 CA:1
+Smoothing: 20
+Face 39: A:19 B:24 C:20 AB:1 BC:1 CA:0
+Smoothing: 20
+Face 40: A:20 B:26 C:21 AB:0 BC:1 CA:1
+Smoothing: 21
+Face 41: A:20 B:25 C:26 AB:1 BC:1 CA:0
+Smoothing: 21
+Face 42: A:21 B:27 C:22 AB:0 BC:1 CA:1
+Smoothing: 22
+Face 43: A:21 B:26 C:27 AB:1 BC:1 CA:0
+Smoothing: 22
+Face 44: A:22 B:28 C:23 AB:0 BC:1 CA:1
+Smoothing: 23
+Face 45: A:22 B:27 C:28 AB:1 BC:1 CA:0
+Smoothing: 23
+Face 46: A:23 B:29 C:24 AB:0 BC:1 CA:1
+Smoothing: 24
+Face 47: A:23 B:28 C:29 AB:1 BC:1 CA:0
+Smoothing: 24
+Face 48: A:24 B:25 C:20 AB:0 BC:1 CA:1
+Smoothing: 25
+Face 49: A:24 B:29 C:25 AB:1 BC:1 CA:0
+Smoothing: 25
+Face 50: A:25 B:31 C:26 AB:0 BC:1 CA:1
+Smoothing: 26
+Face 51: A:25 B:30 C:31 AB:1 BC:1 CA:0
+Smoothing: 26
+Face 52: A:26 B:32 C:27 AB:0 BC:1 CA:1
+Smoothing: 27
+Face 53: A:26 B:31 C:32 AB:1 BC:1 CA:0
+Smoothing: 27
+Face 54: A:27 B:33 C:28 AB:0 BC:1 CA:1
+Smoothing: 28
+Face 55: A:27 B:32 C:33 AB:1 BC:1 CA:0
+Smoothing: 28
+Face 56: A:28 B:34 C:29 AB:0 BC:1 CA:1
+Smoothing: 29
+Face 57: A:28 B:33 C:34 AB:1 BC:1 CA:0
+Smoothing: 29
+Face 58: A:29 B:30 C:25 AB:0 BC:1 CA:1
+Smoothing: 30
+Face 59: A:29 B:34 C:30 AB:1 BC:1 CA:0
+Smoothing: 30
+Face 60: A:30 B:36 C:31 AB:0 BC:1 CA:1
+Smoothing: 31
+Face 61: A:30 B:35 C:36 AB:1 BC:1 CA:0
+Smoothing: 31
+Face 62: A:31 B:37 C:32 AB:0 BC:1 CA:1
+Smoothing: 32
+Face 63: A:31 B:36 C:37 AB:1 BC:1 CA:0
+Smoothing: 32
+Face 64: A:32 B:38 C:33 AB:0 BC:1 CA:1
+Smoothing: 1
+Face 65: A:32 B:37 C:38 AB:1 BC:1 CA:0
+Smoothing: 1
+Face 66: A:33 B:39 C:34 AB:0 BC:1 CA:1
+Smoothing: 2
+Face 67: A:33 B:38 C:39 AB:1 BC:1 CA:0
+Smoothing: 2
+Face 68: A:34 B:35 C:30 AB:0 BC:1 CA:1
+
+ Page 3
+
+
+
+Smoothing: 3
+Face 69: A:34 B:39 C:35 AB:1 BC:1 CA:0
+Smoothing: 3
+Face 70: A:35 B:1 C:36 AB:0 BC:1 CA:1
+Smoothing: 4
+Face 71: A:35 B:0 C:1 AB:1 BC:1 CA:0
+Smoothing: 4
+Face 72: A:36 B:2 C:37 AB:0 BC:1 CA:1
+Smoothing: 5
+Face 73: A:36 B:1 C:2 AB:1 BC:1 CA:0
+Smoothing: 5
+Face 74: A:37 B:3 C:38 AB:0 BC:1 CA:1
+Smoothing: 6
+Face 75: A:37 B:2 C:3 AB:1 BC:1 CA:0
+Smoothing: 6
+Face 76: A:38 B:4 C:39 AB:0 BC:1 CA:1
+Smoothing: 7
+Face 77: A:38 B:3 C:4 AB:1 BC:1 CA:0
+Smoothing: 7
+Face 78: A:39 B:0 C:35 AB:0 BC:1 CA:1
+Smoothing: 8
+Face 79: A:39 B:4 C:0 AB:1 BC:1 CA:0
+Smoothing: 8
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+ Page 4
+
+
+
diff --git a/progs/ggi/tube.asc b/progs/ggi/tube.asc
new file mode 100644
index 0000000000..0b5dd0d810
--- /dev/null
+++ b/progs/ggi/tube.asc
@@ -0,0 +1,396 @@
+Ambient light color: Red=0.039216 Green=0.039216 Blue=0.039216
+
+Named object: "Object01"
+Tri-mesh, Vertices: 64 Faces: 128
+Vertex list:
+Vertex 0: X: 61.483898 Y: 37.836231 Z: -70.94294
+Vertex 1: X: 82.867447 Y: 37.836235 Z: -41.288902
+Vertex 2: X: 91.275154 Y: 37.836239 Z: -5.70901
+Vertex 3: X: 85.427025 Y: 37.836243 Z: 30.380013
+Vertex 4: X: 66.213379 Y: 37.836243 Z: 61.483936
+Vertex 5: X: 36.559322 Y: 37.836246 Z: 82.86747
+Vertex 6: X: 0.979424 Y: 37.836246 Z: 91.275154
+Vertex 7: X: -35.109554 Y: 37.836246 Z: 85.42701
+Vertex 8: X: -66.213478 Y: 37.836246 Z: 66.213356
+Vertex 9: X: -87.597 Y: 37.836243 Z: 36.559303
+Vertex 10: X: -96.004677 Y: 37.836239 Z: 0.979406
+Vertex 11: X: -90.156517 Y: 37.836235 Z: -35.109615
+Vertex 12: X: -70.942848 Y: 37.836235 Z: -66.213516
+Vertex 13: X: -41.288776 Y: 37.836231 Z: -87.597023
+Vertex 14: X: -5.708872 Y: 37.836231 Z: -96.004692
+Vertex 15: X: 30.380142 Y: 37.836231 Z: -90.156502
+Vertex 16: X: 61.483898 Y: -38.14529 Z: -70.942932
+Vertex 17: X: 82.867447 Y: -38.145287 Z: -41.288895
+Vertex 18: X: 91.275154 Y: -38.145283 Z: -5.709003
+Vertex 19: X: 85.427025 Y: -38.145279 Z: 30.38002
+Vertex 20: X: 66.213379 Y: -38.145279 Z: 61.483944
+Vertex 21: X: 36.559322 Y: -38.145275 Z: 82.867477
+Vertex 22: X: 0.979424 Y: -38.145275 Z: 91.275162
+Vertex 23: X: -35.109554 Y: -38.145275 Z: 85.427017
+Vertex 24: X: -66.213478 Y: -38.145275 Z: 66.213364
+Vertex 25: X: -87.597 Y: -38.145279 Z: 36.559311
+Vertex 26: X: -96.004677 Y: -38.145283 Z: 0.979412
+Vertex 27: X: -90.156517 Y: -38.145287 Z: -35.109608
+Vertex 28: X: -70.942848 Y: -38.145287 Z: -66.213516
+Vertex 29: X: -41.288776 Y: -38.14529 Z: -87.597015
+Vertex 30: X: -5.708872 Y: -38.14529 Z: -96.004684
+Vertex 31: X: 30.380142 Y: -38.14529 Z: -90.156494
+Vertex 32: X: 29.53923 Y: 37.836235 Z: -36.632011
+Vertex 33: X: 40.224194 Y: 37.836239 Z: -21.814436
+Vertex 34: X: 44.425369 Y: 37.836239 Z: -4.035822
+Vertex 35: X: 41.503166 Y: 37.836239 Z: 13.997195
+Vertex 36: X: 31.902466 Y: 37.836243 Z: 29.539249
+Vertex 37: X: 17.084883 Y: 37.836243 Z: 40.224201
+Vertex 38: X: -0.693734 Y: 37.836243 Z: 44.425365
+Vertex 39: X: -18.726728 Y: 37.836243 Z: 41.503159
+Vertex 40: X: -34.26878 Y: 37.836243 Z: 31.902454
+Vertex 41: X: -44.953732 Y: 37.836239 Z: 17.084871
+Vertex 42: X: -49.154892 Y: 37.836239 Z: -0.693745
+Vertex 43: X: -46.232677 Y: 37.836239 Z: -18.726759
+Vertex 44: X: -36.631962 Y: 37.836235 Z: -34.268806
+Vertex 45: X: -21.814371 Y: 37.836235 Z: -44.953747
+Vertex 46: X: -4.035751 Y: 37.836235 Z: -49.1549
+Vertex 47: X: 13.997261 Y: 37.836235 Z: -46.23267
+Vertex 48: X: 29.53923 Y: -38.145287 Z: -36.632004
+Vertex 49: X: 40.224194 Y: -38.145283 Z: -21.814428
+Vertex 50: X: 44.425369 Y: -38.145283 Z: -4.035816
+Vertex 51: X: 41.503166 Y: -38.145283 Z: 13.997201
+Vertex 52: X: 31.902466 Y: -38.145279 Z: 29.539257
+Vertex 53: X: 17.084883 Y: -38.145279 Z: 40.224209
+Vertex 54: X: -0.693734 Y: -38.145279 Z: 44.425373
+Vertex 55: X: -18.726728 Y: -38.145279 Z: 41.503166
+
+ Page 1
+
+
+
+Vertex 56: X: -34.26878 Y: -38.145279 Z: 31.902462
+Vertex 57: X: -44.953732 Y: -38.145283 Z: 17.084879
+Vertex 58: X: -49.154892 Y: -38.145283 Z: -0.693738
+Vertex 59: X: -46.232677 Y: -38.145283 Z: -18.726751
+Vertex 60: X: -36.631962 Y: -38.145287 Z: -34.268799
+Vertex 61: X: -21.814371 Y: -38.145287 Z: -44.953739
+Vertex 62: X: -4.035751 Y: -38.145287 Z: -49.154892
+Vertex 63: X: 13.997261 Y: -38.145287 Z: -46.232662
+Face list:
+Face 0: A:0 B:1 C:17 AB:1 BC:1 CA:0
+Smoothing: 1
+Face 1: A:0 B:17 C:16 AB:0 BC:1 CA:1
+Smoothing: 1
+Face 2: A:1 B:2 C:18 AB:1 BC:1 CA:0
+Smoothing: 2
+Face 3: A:1 B:18 C:17 AB:0 BC:1 CA:1
+Smoothing: 2
+Face 4: A:2 B:3 C:19 AB:1 BC:1 CA:0
+Smoothing: 3
+Face 5: A:2 B:19 C:18 AB:0 BC:1 CA:1
+Smoothing: 3
+Face 6: A:3 B:4 C:20 AB:1 BC:1 CA:0
+Smoothing: 4
+Face 7: A:3 B:20 C:19 AB:0 BC:1 CA:1
+Smoothing: 4
+Face 8: A:4 B:5 C:21 AB:1 BC:1 CA:0
+Smoothing: 5
+Face 9: A:4 B:21 C:20 AB:0 BC:1 CA:1
+Smoothing: 5
+Face 10: A:5 B:6 C:22 AB:1 BC:1 CA:0
+Smoothing: 6
+Face 11: A:5 B:22 C:21 AB:0 BC:1 CA:1
+Smoothing: 6
+Face 12: A:6 B:7 C:23 AB:1 BC:1 CA:0
+Smoothing: 7
+Face 13: A:6 B:23 C:22 AB:0 BC:1 CA:1
+Smoothing: 7
+Face 14: A:7 B:8 C:24 AB:1 BC:1 CA:0
+Smoothing: 8
+Face 15: A:7 B:24 C:23 AB:0 BC:1 CA:1
+Smoothing: 8
+Face 16: A:8 B:9 C:25 AB:1 BC:1 CA:0
+Smoothing: 9
+Face 17: A:8 B:25 C:24 AB:0 BC:1 CA:1
+Smoothing: 9
+Face 18: A:9 B:10 C:26 AB:1 BC:1 CA:0
+Smoothing: 10
+Face 19: A:9 B:26 C:25 AB:0 BC:1 CA:1
+Smoothing: 10
+Face 20: A:10 B:11 C:27 AB:1 BC:1 CA:0
+Smoothing: 11
+Face 21: A:10 B:27 C:26 AB:0 BC:1 CA:1
+Smoothing: 11
+Face 22: A:11 B:12 C:28 AB:1 BC:1 CA:0
+Smoothing: 12
+Face 23: A:11 B:28 C:27 AB:0 BC:1 CA:1
+Smoothing: 12
+Face 24: A:12 B:13 C:29 AB:1 BC:1 CA:0
+Smoothing: 13
+Face 25: A:12 B:29 C:28 AB:0 BC:1 CA:1
+Smoothing: 13
+
+ Page 2
+
+
+
+Face 26: A:13 B:14 C:30 AB:1 BC:1 CA:0
+Smoothing: 14
+Face 27: A:13 B:30 C:29 AB:0 BC:1 CA:1
+Smoothing: 14
+Face 28: A:14 B:15 C:31 AB:1 BC:1 CA:0
+Smoothing: 15
+Face 29: A:14 B:31 C:30 AB:0 BC:1 CA:1
+Smoothing: 15
+Face 30: A:15 B:0 C:16 AB:1 BC:1 CA:0
+Smoothing: 16
+Face 31: A:15 B:16 C:31 AB:0 BC:1 CA:1
+Smoothing: 16
+Face 32: A:32 B:49 C:33 AB:0 BC:1 CA:1
+Smoothing: 17
+Face 33: A:32 B:48 C:49 AB:1 BC:1 CA:0
+Smoothing: 17
+Face 34: A:33 B:50 C:34 AB:0 BC:1 CA:1
+Smoothing: 18
+Face 35: A:33 B:49 C:50 AB:1 BC:1 CA:0
+Smoothing: 18
+Face 36: A:34 B:51 C:35 AB:0 BC:1 CA:1
+Smoothing: 19
+Face 37: A:34 B:50 C:51 AB:1 BC:1 CA:0
+Smoothing: 19
+Face 38: A:35 B:52 C:36 AB:0 BC:1 CA:1
+Smoothing: 20
+Face 39: A:35 B:51 C:52 AB:1 BC:1 CA:0
+Smoothing: 20
+Face 40: A:36 B:53 C:37 AB:0 BC:1 CA:1
+Smoothing: 21
+Face 41: A:36 B:52 C:53 AB:1 BC:1 CA:0
+Smoothing: 21
+Face 42: A:37 B:54 C:38 AB:0 BC:1 CA:1
+Smoothing: 22
+Face 43: A:37 B:53 C:54 AB:1 BC:1 CA:0
+Smoothing: 22
+Face 44: A:38 B:55 C:39 AB:0 BC:1 CA:1
+Smoothing: 23
+Face 45: A:38 B:54 C:55 AB:1 BC:1 CA:0
+Smoothing: 23
+Face 46: A:39 B:56 C:40 AB:0 BC:1 CA:1
+Smoothing: 24
+Face 47: A:39 B:55 C:56 AB:1 BC:1 CA:0
+Smoothing: 24
+Face 48: A:40 B:57 C:41 AB:0 BC:1 CA:1
+Smoothing: 25
+Face 49: A:40 B:56 C:57 AB:1 BC:1 CA:0
+Smoothing: 25
+Face 50: A:41 B:58 C:42 AB:0 BC:1 CA:1
+Smoothing: 26
+Face 51: A:41 B:57 C:58 AB:1 BC:1 CA:0
+Smoothing: 26
+Face 52: A:42 B:59 C:43 AB:0 BC:1 CA:1
+Smoothing: 27
+Face 53: A:42 B:58 C:59 AB:1 BC:1 CA:0
+Smoothing: 27
+Face 54: A:43 B:60 C:44 AB:0 BC:1 CA:1
+Smoothing: 28
+Face 55: A:43 B:59 C:60 AB:1 BC:1 CA:0
+Smoothing: 28
+Face 56: A:44 B:61 C:45 AB:0 BC:1 CA:1
+
+ Page 3
+
+
+
+Smoothing: 29
+Face 57: A:44 B:60 C:61 AB:1 BC:1 CA:0
+Smoothing: 29
+Face 58: A:45 B:62 C:46 AB:0 BC:1 CA:1
+Smoothing: 30
+Face 59: A:45 B:61 C:62 AB:1 BC:1 CA:0
+Smoothing: 30
+Face 60: A:46 B:63 C:47 AB:0 BC:1 CA:1
+Smoothing: 31
+Face 61: A:46 B:62 C:63 AB:1 BC:1 CA:0
+Smoothing: 31
+Face 62: A:47 B:48 C:32 AB:0 BC:1 CA:1
+Smoothing: 32
+Face 63: A:47 B:63 C:48 AB:1 BC:1 CA:0
+Smoothing: 32
+Face 64: A:0 B:32 C:33 AB:0 BC:1 CA:0
+Smoothing: 1
+Face 65: A:0 B:33 C:1 AB:0 BC:0 CA:1
+Smoothing: 1
+Face 66: A:1 B:33 C:34 AB:0 BC:1 CA:0
+Smoothing: 1
+Face 67: A:1 B:34 C:2 AB:0 BC:0 CA:1
+Smoothing: 1
+Face 68: A:2 B:34 C:35 AB:0 BC:1 CA:0
+Smoothing: 1
+Face 69: A:2 B:35 C:3 AB:0 BC:0 CA:1
+Smoothing: 1
+Face 70: A:3 B:35 C:36 AB:0 BC:1 CA:0
+Smoothing: 1
+Face 71: A:3 B:36 C:4 AB:0 BC:0 CA:1
+Smoothing: 1
+Face 72: A:4 B:36 C:37 AB:0 BC:1 CA:0
+Smoothing: 1
+Face 73: A:4 B:37 C:5 AB:0 BC:0 CA:1
+Smoothing: 1
+Face 74: A:5 B:37 C:38 AB:0 BC:1 CA:0
+Smoothing: 1
+Face 75: A:5 B:38 C:6 AB:0 BC:0 CA:1
+Smoothing: 1
+Face 76: A:6 B:38 C:39 AB:0 BC:1 CA:0
+Smoothing: 1
+Face 77: A:6 B:39 C:7 AB:0 BC:0 CA:1
+Smoothing: 1
+Face 78: A:7 B:39 C:40 AB:0 BC:1 CA:0
+Smoothing: 1
+Face 79: A:7 B:40 C:8 AB:0 BC:0 CA:1
+Smoothing: 1
+Face 80: A:8 B:40 C:41 AB:0 BC:1 CA:0
+Smoothing: 1
+Face 81: A:8 B:41 C:9 AB:0 BC:0 CA:1
+Smoothing: 1
+Face 82: A:9 B:41 C:42 AB:0 BC:1 CA:0
+Smoothing: 1
+Face 83: A:9 B:42 C:10 AB:0 BC:0 CA:1
+Smoothing: 1
+Face 84: A:10 B:42 C:43 AB:0 BC:1 CA:0
+Smoothing: 1
+Face 85: A:10 B:43 C:11 AB:0 BC:0 CA:1
+Smoothing: 1
+Face 86: A:11 B:43 C:44 AB:0 BC:1 CA:0
+Smoothing: 1
+
+ Page 4
+
+
+
+Face 87: A:11 B:44 C:12 AB:0 BC:0 CA:1
+Smoothing: 1
+Face 88: A:12 B:44 C:45 AB:0 BC:1 CA:0
+Smoothing: 1
+Face 89: A:12 B:45 C:13 AB:0 BC:0 CA:1
+Smoothing: 1
+Face 90: A:13 B:45 C:46 AB:0 BC:1 CA:0
+Smoothing: 1
+Face 91: A:13 B:46 C:14 AB:0 BC:0 CA:1
+Smoothing: 1
+Face 92: A:14 B:46 C:47 AB:0 BC:1 CA:0
+Smoothing: 1
+Face 93: A:14 B:47 C:15 AB:0 BC:0 CA:1
+Smoothing: 1
+Face 94: A:15 B:47 C:32 AB:0 BC:1 CA:0
+Smoothing: 1
+Face 95: A:15 B:32 C:0 AB:0 BC:0 CA:1
+Smoothing: 1
+Face 96: A:16 B:17 C:49 AB:1 BC:0 CA:0
+Smoothing: 2
+Face 97: A:16 B:49 C:48 AB:0 BC:1 CA:0
+Smoothing: 2
+Face 98: A:17 B:18 C:50 AB:1 BC:0 CA:0
+Smoothing: 2
+Face 99: A:17 B:50 C:49 AB:0 BC:1 CA:0
+Smoothing: 2
+Face 100: A:18 B:19 C:51 AB:1 BC:0 CA:0
+Smoothing: 2
+Face 101: A:18 B:51 C:50 AB:0 BC:1 CA:0
+Smoothing: 2
+Face 102: A:19 B:20 C:52 AB:1 BC:0 CA:0
+Smoothing: 2
+Face 103: A:19 B:52 C:51 AB:0 BC:1 CA:0
+Smoothing: 2
+Face 104: A:20 B:21 C:53 AB:1 BC:0 CA:0
+Smoothing: 2
+Face 105: A:20 B:53 C:52 AB:0 BC:1 CA:0
+Smoothing: 2
+Face 106: A:21 B:22 C:54 AB:1 BC:0 CA:0
+Smoothing: 2
+Face 107: A:21 B:54 C:53 AB:0 BC:1 CA:0
+Smoothing: 2
+Face 108: A:22 B:23 C:55 AB:1 BC:0 CA:0
+Smoothing: 2
+Face 109: A:22 B:55 C:54 AB:0 BC:1 CA:0
+Smoothing: 2
+Face 110: A:23 B:24 C:56 AB:1 BC:0 CA:0
+Smoothing: 2
+Face 111: A:23 B:56 C:55 AB:0 BC:1 CA:0
+Smoothing: 2
+Face 112: A:24 B:25 C:57 AB:1 BC:0 CA:0
+Smoothing: 2
+Face 113: A:24 B:57 C:56 AB:0 BC:1 CA:0
+Smoothing: 2
+Face 114: A:25 B:26 C:58 AB:1 BC:0 CA:0
+Smoothing: 2
+Face 115: A:25 B:58 C:57 AB:0 BC:1 CA:0
+Smoothing: 2
+Face 116: A:26 B:27 C:59 AB:1 BC:0 CA:0
+Smoothing: 2
+Face 117: A:26 B:59 C:58 AB:0 BC:1 CA:0
+
+ Page 5
+
+
+
+Smoothing: 2
+Face 118: A:27 B:28 C:60 AB:1 BC:0 CA:0
+Smoothing: 2
+Face 119: A:27 B:60 C:59 AB:0 BC:1 CA:0
+Smoothing: 2
+Face 120: A:28 B:29 C:61 AB:1 BC:0 CA:0
+Smoothing: 2
+Face 121: A:28 B:61 C:60 AB:0 BC:1 CA:0
+Smoothing: 2
+Face 122: A:29 B:30 C:62 AB:1 BC:0 CA:0
+Smoothing: 2
+Face 123: A:29 B:62 C:61 AB:0 BC:1 CA:0
+Smoothing: 2
+Face 124: A:30 B:31 C:63 AB:1 BC:0 CA:0
+Smoothing: 2
+Face 125: A:30 B:63 C:62 AB:0 BC:1 CA:0
+Smoothing: 2
+Face 126: A:31 B:16 C:48 AB:1 BC:0 CA:0
+Smoothing: 2
+Face 127: A:31 B:48 C:63 AB:0 BC:1 CA:0
+Smoothing: 2
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+ Page 6
+
+
+
diff --git a/src/glut/ggi/EXPSYMS b/src/glut/ggi/EXPSYMS
new file mode 100644
index 0000000000..dc55623297
--- /dev/null
+++ b/src/glut/ggi/EXPSYMS
@@ -0,0 +1,2 @@
+glutInit
+glutSwapBuffers
diff --git a/src/glut/ggi/ggiglut.c b/src/glut/ggi/ggiglut.c
new file mode 100644
index 0000000000..f9ca0a71fd
--- /dev/null
+++ b/src/glut/ggi/ggiglut.c
@@ -0,0 +1,840 @@
+/* **************************************************************************
+ * ggiglut.c
+ * **************************************************************************
+ *
+ * Copyright (C) 1998 Uwe Maurer - uwe_maurer@t-online.de
+ * Copyright (C) 1999 James Simmons
+ * Copyright (C) 1999 Jon Taylor
+ *
+ * This library is free software; you can redistribute it and/or
+ * modify it under the terms of the GNU Library General Public
+ * License as published by the Free Software Foundation; either
+ * version 2 of the License, or (at your option) any later version.
+ *
+ * This library 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
+ * Library General Public License for more details.
+ *
+ * You should have received a copy of the GNU Library General Public
+ * License along with this library; if not, write to the Free
+ * Software Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
+ *
+ * **************************************************************************
+ * To-do:
+ * - Make everything use the portable ggi_* types
+ *
+ */
+
+#define WIDTH 640
+#define HEIGHT 480
+#define GRAPHTYPE_RGB GT_16BIT
+#define GRAPHTYPE_INDEX GT_8BIT
+
+/*************************************************************************/
+
+#include <GL/gl.h>
+#include <GL/glu.h>
+#include <GL/glut.h>
+#include <malloc.h>
+#include <stdio.h>
+#include <stdarg.h>
+#include <string.h>
+#include "GL/ggimesa.h"
+
+#include <ggi/ggi.h>
+#include <ggi/gii.h>
+
+char *__glutProgramName = "GGI";
+
+static ggi_visual_t __glut_vis;
+
+static GGIMesaContext __glut_ctx;
+
+static int __glut_width = WIDTH;
+static int __glut_height = HEIGHT;
+static ggi_graphtype __glut_gt_rgb = GRAPHTYPE_RGB;
+static ggi_graphtype __glut_gt_index = GRAPHTYPE_INDEX;
+static int __glut_init = GL_FALSE;
+
+static int mousex = WIDTH / 2;
+static int mousey = HEIGHT / 2;
+static int mouse_moved = GL_FALSE;
+static int mouse_down = GL_FALSE;
+static int mouse_showcursor = GL_FALSE;
+
+static void (*__glut_reshape)(int, int);
+static void (*__glut_display)(void);
+static void (*__glut_idle)(void);
+static void (*__glut_keyboard)(unsigned char, int, int);
+static void (*__glut_special)(int, int, int);
+static void (*__glut_mouse)(int, int, int, int);
+static void (*__glut_motion)(int, int);
+static void (*__glut_passive_motion)(int, int);
+static void (*__glut_visibility)(int);
+
+static unsigned int __glut_mode = GLUT_RGB | GLUT_SINGLE | GLUT_DEPTH;
+
+static int __glut_mod_keys = 0;
+
+static int __glut_redisplay = GL_FALSE;
+
+/* Menu */
+static int __glut_menubutton = -1;
+static int __glut_menuactive = GL_FALSE;
+
+#define MAX_ENTRIES 64
+
+typedef struct menu_s
+{
+ char *label[MAX_ENTRIES];
+ int value[MAX_ENTRIES];
+ struct menu_s * submenu[MAX_ENTRIES];
+ void (*func)(int);
+ int max_strlen;
+ int num_entries;
+} menu_t;
+
+static menu_t *mainmenu;
+static menu_t *curmenu;
+static menu_t *activemenu;
+
+int glut_ggi_debug = GL_FALSE;
+
+void glut_ggiPRINT(char *format, ...)
+{
+ va_list args;
+ va_start(args, format);
+ fprintf(stderr, "GGIGLUT: ");
+ vfprintf(stderr, format, args);
+ va_end(args);
+}
+
+void glut_ggiDEBUG(char *format, ...)
+{
+ va_list args;
+ if (glut_ggi_debug)
+ {
+ va_start(args, format);
+ fprintf(stderr, "GGIGLUT: ");
+ vfprintf(stderr, format, args);
+ va_end(args);
+ }
+
+}
+
+void glutInit(int *argc, char **argv)
+{
+ ggi_graphtype gt;
+ int i, k;
+ char *s;
+
+ #define REMOVE {for (k=i;k<*argc-1;k++) argv[k]=argv[k+1]; \
+ (*argc)--; i--; }
+
+ if (__glut_init) return;
+
+ s = getenv("GGIGLUT_DEBUG");
+ glut_ggi_debug = (s && atoi(s));
+
+ if (argc && argv)
+ {
+
+ for (i = 1; i < *argc; i++)
+ {
+ if (strcmp(argv[i], "-mouse") == 0)
+ {
+ mouse_showcursor = GL_TRUE;
+ REMOVE;
+ }
+ else
+ if (strcmp(argv[i], "-bpp") == 0 && (i + 1) < (*argc))
+ {
+ switch(atoi(argv[i + 1]))
+ {
+ case 4: gt = GT_4BIT; break;
+ case 8: gt = GT_8BIT; break;
+ case 15: gt = GT_15BIT; break;
+ case 16: gt = GT_16BIT; break;
+ case 24: gt = GT_24BIT; break;
+ case 32: gt = GT_32BIT; break;
+ default:
+ glut_ggiDEBUG("\"%s\" bits per pixel?\n",
+ argv[i+1]);
+
+ exit(1);
+ }
+ __glut_gt_rgb = __glut_gt_index = gt;
+ REMOVE;
+ REMOVE;
+ }
+ else
+ if (strcmp(argv[i], "-size") == 0 && (i + 2) < (*argc))
+ {
+ __glut_width=atoi(argv[i+1]);
+ __glut_height=atoi(argv[i+2]);
+ REMOVE;
+ REMOVE;
+ REMOVE;
+ }
+ }
+ }
+
+ if (ggiInit()<0)
+ {
+ ggiPanic("ggiInit() failed!\n");
+ }
+ __glut_init=GL_TRUE;
+
+ #undef REMOVE
+}
+
+void glutInitWindowPosition(int x, int y)
+{
+}
+
+void glutInitWindowSize(int x, int y)
+{
+}
+
+void glutFullScreen(void)
+{
+}
+
+void glutInitDisplayMode(unsigned int mode)
+{
+ __glut_mode = mode;
+}
+
+void glutInitDisplayString(const char *string)
+{
+ glut_ggiPRINT("glutInitDisplayString: %s\n", string);
+}
+
+int glutCreateWindow(const char *title)
+{
+ ggi_graphtype gt;
+ ggi_mode mode =
+ {
+ 1,
+ { GGI_AUTO, GGI_AUTO },
+ { GGI_AUTO, GGI_AUTO },
+ { 0, 0 },
+ GT_AUTO,
+ { GGI_AUTO, GGI_AUTO }
+ };
+ int frames;
+ int rgb;
+ int err;
+
+ if (!__glut_init)
+ glutInit(NULL, NULL);
+
+ glut_ggiPRINT("GGIGLUT: %s\n", title);
+
+ rgb = !(__glut_mode & GLUT_INDEX);
+ frames = (__glut_mode & GLUT_DOUBLE) ? 2 : 1;
+ gt = (rgb) ? __glut_gt_rgb : __glut_gt_index;
+
+ __glut_ctx = GGIMesaCreateContext();
+
+ if (__glut_ctx == NULL)
+ ggiPanic("Can't create mesa-context\n");
+
+ __glut_vis = ggiOpen(NULL);
+ if (__glut_vis == NULL)
+ {
+ ggiPanic("ggiOpen() failed!\n");
+ /* return GL_FALSE; */
+ }
+
+ ggiSetFlags(__glut_vis, GGIFLAG_ASYNC);
+
+ ggiCheckMode(__glut_vis, &mode);
+
+ err = ggiSetMode(__glut_vis, &mode);
+ if (err < 0)
+ {
+ ggiPanic("Can't set graphic mode!\n");
+ /* return GL_FALSE; */
+ }
+
+ ggiGetMode(__glut_vis, &mode);
+
+ if (GGIMesaSetVisual(__glut_ctx, __glut_vis, rgb, frames > 1) < 0)
+ {
+ ggiPanic("GGIMesaSetVisual failed!\n");
+ }
+
+ GGIMesaMakeCurrent(__glut_ctx);
+
+ if (__glut_reshape)
+ __glut_reshape(__glut_width, __glut_height);
+
+ return GL_TRUE;
+}
+
+void glutReshapeFunc(void (*func)(int, int))
+{
+ __glut_reshape = func;
+ if (__glut_vis && __glut_reshape)
+ __glut_reshape(__glut_width, __glut_height);
+}
+
+void glutKeyboardFunc(void (*keyboard)(unsigned char key, int x, int y))
+{
+ __glut_keyboard = keyboard;
+}
+
+int glutGetModifiers(void)
+{
+ return __glut_mod_keys;
+}
+
+void glutEntryFunc(void (*func)(int state))
+{
+}
+
+void glutVisibilitFunc(void (*func)(int state))
+{
+}
+
+void glutTimerFunc(unsigned int millis, void (*func)(int value), int value)
+{
+}
+
+void glutMenuStateFunc(void (*func)(int state))
+{
+}
+
+int glutGet(GLenum type)
+{
+ switch(type)
+ {
+ case GLUT_WINDOW_X:
+ return 0;
+ case GLUT_WINDOW_Y:
+ return 0;
+ case GLUT_WINDOW_WIDTH:
+ return __glut_width;
+ case GLUT_WINDOW_HEIGHT:
+ return __glut_height;
+ case GLUT_MENU_NUM_ITEMS:
+ if (curmenu)
+ return curmenu->num_entries;
+ else
+ return 0;
+ default:
+ glut_ggiDEBUG("glutGet: unknown type %i\n", type);
+ }
+ return 0;
+}
+
+void glutSpecialFunc(void (*special)(int key, int x, int y))
+{
+ __glut_special=special;
+}
+
+void glutDisplayFunc(void (*disp)(void))
+{
+ __glut_display=disp;
+}
+
+void glutSetColor(int index, GLfloat red, GLfloat green, GLfloat blue)
+{
+ ggi_color c;
+ GLfloat max;
+
+ if (red > 1.0) red = 1.0;
+ if (red < 0.0) red = 0.0;
+ if (green > 1.0) green = 1.0;
+ if (green < 0.0) green = 0.0;
+ if (blue > 1.0) blue = 1.0;
+ if (blue < 0.0) blue = 0.0;
+
+ max = (float)((1 << GGI_COLOR_PRECISION) - 1);
+
+ c.r = (int)(max * red);
+ c.g = (int)(max * green);
+ c.b = (int)(max * blue);
+ ggiSetPalette(__glut_vis, index, 1, &c);
+}
+
+void glutPostRedisplay(void)
+{
+ __glut_redisplay = GL_TRUE;
+}
+
+void glutPostWindowRedisplay(int win)
+{
+ __glut_redisplay = GL_TRUE;
+}
+
+void glutSwapBuffers(void)
+{
+ GGIMesaSwapBuffers();
+}
+
+void glutIdleFunc(void (*idle)(void))
+{
+ __glut_idle = idle;
+}
+
+static void keyboard(ggi_event *ev)
+{
+ int sym;
+ int modifer = 0, key = 0;
+
+ sym = ev->key.sym;
+
+ modifer = ev->key.modifiers;
+ if (modifer == GII_KM_SHIFT)
+ __glut_mod_keys |= GLUT_ACTIVE_SHIFT;
+ if (modifer == GII_KM_CTRL)
+ __glut_mod_keys |= GLUT_ACTIVE_CTRL;
+ if (modifer == GII_KM_ALT)
+ __glut_mod_keys |= GLUT_ACTIVE_ALT;
+
+ /* if (__glut_special && key) __glut_special(GII_KTYP(key),0,0); */
+
+ if (__glut_keyboard)
+// __glut_keyboard(GII_UNICODE(sym), 0, 0);
+ __glut_keyboard(sym, 0, 0);
+}
+
+static void mouseabs(ggi_event *ev)
+{
+ int oldx=mousex;
+ int oldy=mousey;
+
+ mousex=ev->pmove.x;
+ mousey=ev->pmove.y;
+
+ if (mousex<0) mousex=0;
+ if (mousey<0) mousey=0;
+ if (mousex>=__glut_width) mousex=__glut_width-1;
+ if (mousey>=__glut_height) mousey=__glut_height-1;
+
+ if (mousex!=oldx || mousey!=oldy) mouse_moved=GL_TRUE;
+}
+
+static void mouse(ggi_event *ev)
+{
+ int oldx=mousex;
+ int oldy=mousey;
+
+ mousex+=ev->pmove.x>>1;
+ mousey+=ev->pmove.y>>1;
+
+ if (mousex<0) mousex=0;
+ if (mousey<0) mousey=0;
+ if (mousex>=__glut_width) mousex=__glut_width-1;
+ if (mousey>=__glut_height) mousey=__glut_height-1;
+
+ if (mousex!=oldx || mousey!=oldy) mouse_moved=GL_TRUE;
+
+}
+
+/* FIXME: Prototypes belong in headers, not here! [JMT] */
+static void showmenu(void);
+static int clickmenu(void);
+static void updatemouse(void);
+static void drawmouse(void);
+
+static void mousemove(void)
+{
+ if (mouse_moved) {
+ if (__glut_motion && mouse_down) {
+ __glut_motion(mousex,mousey);
+ }
+
+ if (__glut_passive_motion && (!mouse_down)) {
+ __glut_passive_motion(mousex,mousey);
+ }
+
+ if (__glut_menuactive) updatemouse();
+ mouse_moved=GL_FALSE;
+ }
+}
+
+static void button(ggi_event *ev)
+{
+ int i;
+ int btn[4]={0,GLUT_LEFT_BUTTON,GLUT_RIGHT_BUTTON,GLUT_MIDDLE_BUTTON};
+ mousemove();
+
+ if (ev->pbutton.button <= 3) { /* GGI can have >3 buttons ! */
+ char state = ev->any.type == evPtrButtonPress ?GLUT_DOWN:GLUT_UP;
+ if (__glut_menuactive) {
+ if (state==GLUT_UP && clickmenu()) {
+ glutPostRedisplay();
+ __glut_menuactive=GL_FALSE;
+ }
+ } else
+ if (btn[ev->pbutton.button]==__glut_menubutton) {
+ __glut_menuactive=GL_TRUE;
+ activemenu=mainmenu;
+ showmenu();
+ } else
+ if (__glut_mouse) {
+ __glut_mouse(btn[ev->pbutton.button],state,mousex,mousey);
+ }
+ if (state==GLUT_DOWN) {
+ mouse_down|=(1<<(ev->pbutton.button-1));
+ }
+ else mouse_down&=~(1<<(ev->pbutton.button-1));
+ }
+}
+
+void glutMainLoop(void)
+{
+ ggi_event ev;
+ ggi_event_mask evmask = (emKeyPress | emKeyRepeat | emPtrMove | emPtrButton);
+
+ ggiSetEventMask(__glut_vis, evmask);
+
+ glutPostRedisplay();
+
+ if (__glut_visibility)
+ __glut_visibility(GLUT_VISIBLE);
+
+ while (1)
+ {
+ if (!__glut_menuactive)
+ {
+ if (__glut_idle)
+ __glut_idle();
+ if (__glut_redisplay && __glut_display)
+ {
+ __glut_redisplay = GL_FALSE;
+ __glut_display();
+ }
+ }
+
+ while (1)
+ {
+ struct timeval t = {0, 0};
+
+ if (ggiEventPoll(__glut_vis, evmask, &t) == 0)
+ break;
+
+ ggiEventRead(__glut_vis, &ev, evmask);
+
+ switch (ev.any.type)
+ {
+ case evKeyPress:
+ case evKeyRepeat:
+ keyboard(&ev);
+ break;
+ case evPtrAbsolute:
+ mouseabs(&ev);
+ break;
+ case evPtrRelative:
+ mouse(&ev);
+ break;
+ case evPtrButtonPress:
+ case evPtrButtonRelease:
+ button(&ev);
+ break;
+ }
+ }
+ mousemove();
+ }
+}
+
+static void showmenu()
+{
+ int y,i;
+ ggi_color col={0xffff,0xffff,0xffff};
+
+ ggiSetGCForeground(__glut_vis,ggiMapColor(__glut_vis,&col));
+ ggiSetOrigin(__glut_vis,0,0);
+
+ for (y=i=0;i<activemenu->num_entries;i++,y+=8) {
+ ggiPuts(__glut_vis,0,y,activemenu->label[i]);
+ }
+ drawmouse();
+}
+
+static int clickmenu(void)
+{
+ int i;
+ int w,h;
+
+ i=mousey/8;
+
+ if (i>=activemenu->num_entries) return GL_TRUE;
+ if (mousex>=8*strlen(activemenu->label[i])) return GL_TRUE;
+
+ if (activemenu->submenu[i]) {
+ ggi_color col={0,0,0};
+ ggiSetGCForeground(__glut_vis,ggiMapColor(__glut_vis,&col));
+ h=activemenu->num_entries*8;
+ w=activemenu->max_strlen*8;
+ ggiDrawBox(__glut_vis,0,0,w,h);
+ activemenu=activemenu->submenu[i];
+ showmenu();
+ return GL_FALSE;
+ }
+ curmenu=activemenu;
+ activemenu->func(activemenu->value[i]);
+ return GL_TRUE;
+}
+
+static int oldx=-1;
+static int oldy=-1;
+static char buffer[16*16*4];
+
+static void updatemouse()
+{
+ ggiPutBox(__glut_vis,oldx,oldy,16,16,buffer);
+ drawmouse();
+}
+
+static void drawmouse()
+{
+ int x,y;
+ x=mousex-8;
+ if (x<0) x=0;
+ y=mousey-8;
+ if (y<0) y=0;
+ ggiGetBox(__glut_vis,x,y,16,16,buffer);
+ ggiDrawLine(__glut_vis,mousex-2,mousey,mousex+2,mousey);
+ ggiDrawLine(__glut_vis,mousex,mousey-2,mousex,mousey+2);
+ oldx=x;
+ oldy=y;
+}
+
+int glutCreateMenu(void(*func)(int))
+{
+ menu_t *m;
+ m=malloc(sizeof(menu_t));
+ memset(m,0,sizeof(menu_t));
+ curmenu=m;
+ curmenu->func=func;
+ return (int)curmenu;
+}
+
+static void addEntry(const char *label,int value,menu_t *submenu)
+{
+ int i=curmenu->num_entries;
+ /* printf("%i %i %s %p\n",i,value,label,submenu); */
+ if (i<MAX_ENTRIES) {
+ curmenu->label[i]=strdup(label);
+ curmenu->value[i]=value;
+ curmenu->submenu[i]=submenu;
+
+ if (strlen(label)>curmenu->max_strlen)
+ curmenu->max_strlen=strlen(label);
+ curmenu->num_entries++;
+ }
+}
+
+void glutAddMenuEntry(const char *label,int value)
+{
+ addEntry(label,value,NULL);
+}
+
+void glutAddSubMenu(const char *label,int submenu)
+{
+ char text[100];
+
+ if (!curmenu) return;
+ strncpy(text,label,98);
+ text[98]=0;
+ text[strlen(text)+1]=0;
+ text[strlen(text)]='>';
+
+ addEntry(text,0,(menu_t *) submenu);
+}
+
+void glutAttachMenu(int button)
+{
+ mainmenu=curmenu;
+ __glut_menubutton=button;
+}
+
+void glutDetachMenu(int button)
+{
+}
+
+void glutVisibilityFunc(void (*func)(int state))
+{
+ __glut_visibility=func;
+}
+
+void glutMouseFunc(void (*mouse)(int, int, int, int))
+{
+ __glut_mouse=mouse;
+}
+
+void glutMotionFunc(void (*motion)(int,int))
+{
+ __glut_motion=motion;
+}
+
+void glutPassiveMotionFunc(void (*motion)(int,int))
+{
+ __glut_passive_motion=motion;
+}
+
+void glutSetWindowTitle(const char *title)
+{
+}
+
+void glutSetIconTitle(const char *title)
+{
+}
+
+void glutChangeToMenuEntry(int item,const char *label,int value)
+{
+ if (item>0 && item<=curmenu->num_entries) {
+ item--;
+ free(curmenu->label[item]);
+ curmenu->label[item]=strdup(label);
+ curmenu->value[item]=value;
+ curmenu->submenu[item]=NULL;
+ }
+}
+void glutChangeToSubMenu(int item,const char *label,int submenu)
+{
+ if (item>0 && item<=curmenu->num_entries) {
+ item--;
+ free(curmenu->label[item]);
+ curmenu->label[item]=strdup(label);
+ curmenu->value[item]=0;
+ curmenu->submenu[item]=(menu_t *)submenu;
+ }
+}
+
+void glutDestroyMenu(int menu)
+{
+ menu_t *m=(menu_t *)menu;
+ int i;
+
+ for (i=0;i<m->num_entries;i++) {
+ free(m->label[i]);
+ }
+ free(m);
+}
+
+int glutCreateSubWindow(int win,int x,int y,int w,int h)
+{
+ return 0;
+}
+
+void glutDestroyWindow(int win)
+{
+}
+
+int glutGetWindow(void)
+{
+ return 0;
+}
+
+void glutSetWindow(int win)
+{
+}
+
+void glutPositionWindow(int x,int y)
+{
+}
+
+void glutReshapeWindow(int x,int y)
+{
+}
+
+void glutPushWindow(void)
+{
+}
+
+void glutPopWindow(void)
+{
+}
+
+void glutIconifyWindow(void)
+{
+}
+
+void glutShowWindow()
+{
+}
+
+void glutHideWindow()
+{
+}
+
+void glutSetCursor(int cursor)
+{
+}
+
+void glutWarpPointer(int x,int y)
+{
+}
+
+void glutEstablishOverlay(void)
+{
+}
+
+void glutRemoveOverlay(void)
+{
+}
+
+void glutUseLayer(GLenum layer)
+{
+}
+
+int glutLayerGet(GLenum type)
+{
+ return 0;
+}
+
+void glutPostOverlayRedisplay(void)
+{
+}
+
+void glutPostWindowOverlayRedisplay(int w)
+{
+}
+
+void glutShowOverlay(void)
+{
+}
+
+void glutHideOverlay(void)
+{
+}
+
+int glutGetMenu(void)
+{
+ return 0;
+}
+
+void glutSetMenu(int menu)
+{
+}
+
+void glutRemoveMenuItem(int item)
+{
+}
+
+void glutSpaceBallMotionFunc(void (*func)(int key,int x,int y))
+{
+}
+
+void glutSpaceBallRotateFunc(void (*func)(int x,int y,int z))
+{
+}
+
+void glutSpaceBallButtonFunc(void (*func)(int button,int state))
+{
+}
+
+void glutCopyColormap(int win)
+{
+}
+
+int glutDeviceGet(GLenum param)
+{
+ return 0;
+}