From http://www.jwz.org/xscreensaver/xscreensaver-5.35.tar.gz
[xscreensaver] / hacks / glx / teapot.c
1
2 /* Copyright (c) Mark J. Kilgard, 1994. */
3
4 /**
5 (c) Copyright 1993, Silicon Graphics, Inc.
6
7 ALL RIGHTS RESERVED
8
9 Permission to use, copy, modify, and distribute this software
10 for any purpose and without fee is hereby granted, provided
11 that the above copyright notice appear in all copies and that
12 both the copyright notice and this permission notice appear in
13 supporting documentation, and that the name of Silicon
14 Graphics, Inc. not be used in advertising or publicity
15 pertaining to distribution of the software without specific,
16 written prior permission.
17
18 THE MATERIAL EMBODIED ON THIS SOFTWARE IS PROVIDED TO YOU
19 "AS-IS" AND WITHOUT WARRANTY OF ANY KIND, EXPRESS, IMPLIED OR
20 OTHERWISE, INCLUDING WITHOUT LIMITATION, ANY WARRANTY OF
21 MERCHANTABILITY OR FITNESS FOR A PARTICULAR PURPOSE.  IN NO
22 EVENT SHALL SILICON GRAPHICS, INC.  BE LIABLE TO YOU OR ANYONE
23 ELSE FOR ANY DIRECT, SPECIAL, INCIDENTAL, INDIRECT OR
24 CONSEQUENTIAL DAMAGES OF ANY KIND, OR ANY DAMAGES WHATSOEVER,
25 INCLUDING WITHOUT LIMITATION, LOSS OF PROFIT, LOSS OF USE,
26 SAVINGS OR REVENUE, OR THE CLAIMS OF THIRD PARTIES, WHETHER OR
27 NOT SILICON GRAPHICS, INC.  HAS BEEN ADVISED OF THE POSSIBILITY
28 OF SUCH LOSS, HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY,
29 ARISING OUT OF OR IN CONNECTION WITH THE POSSESSION, USE OR
30 PERFORMANCE OF THIS SOFTWARE.
31
32 US Government Users Restricted Rights
33
34 Use, duplication, or disclosure by the Government is subject to
35 restrictions set forth in FAR 52.227.19(c)(2) or subparagraph
36 (c)(1)(ii) of the Rights in Technical Data and Computer
37 Software clause at DFARS 252.227-7013 and/or in similar or
38 successor clauses in the FAR or the DOD or NASA FAR
39 Supplement.  Unpublished-- rights reserved under the copyright
40 laws of the United States.  Contractor/manufacturer is Silicon
41 Graphics, Inc., 2011 N.  Shoreline Blvd., Mountain View, CA
42 94039-7311.
43
44 OpenGL(TM) is a trademark of Silicon Graphics, Inc.
45 */
46
47 #ifdef HAVE_CONFIG_H
48 # include "config.h"
49 #endif
50
51 #include "teapot.h"
52
53 #ifndef HAVE_JWXYZ
54 # include <GL/gl.h>
55 #endif
56 #ifdef HAVE_ANDROID
57 # include <GLES/gl.h>
58 #endif
59
60 #ifdef HAVE_JWZGLES
61 # include "jwzgles.h"
62 #else
63 # define HAVE_GLMAP
64 #endif
65
66
67 #ifdef HAVE_GLMAP
68
69 /* Rim, body, lid, and bottom data must be reflected in x
70    and y; handle and spout data across the y axis only.  */
71
72 static long patchdata[][16] =
73 {
74     /* rim */
75   {102, 103, 104, 105, 4, 5, 6, 7, 8, 9, 10, 11,
76     12, 13, 14, 15},
77     /* body */
78   {12, 13, 14, 15, 16, 17, 18, 19, 20, 21, 22, 23,
79     24, 25, 26, 27},
80   {24, 25, 26, 27, 29, 30, 31, 32, 33, 34, 35, 36,
81     37, 38, 39, 40},
82     /* lid */
83   {96, 96, 96, 96, 97, 98, 99, 100, 101, 101, 101,
84     101, 0, 1, 2, 3,},
85   {0, 1, 2, 3, 106, 107, 108, 109, 110, 111, 112,
86     113, 114, 115, 116, 117},
87     /* bottom */
88   {118, 118, 118, 118, 124, 122, 119, 121, 123, 126,
89     125, 120, 40, 39, 38, 37},
90     /* handle */
91   {41, 42, 43, 44, 45, 46, 47, 48, 49, 50, 51, 52,
92     53, 54, 55, 56},
93   {53, 54, 55, 56, 57, 58, 59, 60, 61, 62, 63, 64,
94     28, 65, 66, 67},
95     /* spout */
96   {68, 69, 70, 71, 72, 73, 74, 75, 76, 77, 78, 79,
97     80, 81, 82, 83},
98   {80, 81, 82, 83, 84, 85, 86, 87, 88, 89, 90, 91,
99     92, 93, 94, 95}
100 };
101 /* *INDENT-OFF* */
102
103 static float cpdata[][3] =
104 {
105     {0.2, 0, 2.7}, {0.2, -0.112, 2.7}, {0.112, -0.2, 2.7}, {0,
106     -0.2, 2.7}, {1.3375, 0, 2.53125}, {1.3375, -0.749, 2.53125},
107     {0.749, -1.3375, 2.53125}, {0, -1.3375, 2.53125}, {1.4375,
108     0, 2.53125}, {1.4375, -0.805, 2.53125}, {0.805, -1.4375,
109     2.53125}, {0, -1.4375, 2.53125}, {1.5, 0, 2.4}, {1.5, -0.84,
110     2.4}, {0.84, -1.5, 2.4}, {0, -1.5, 2.4}, {1.75, 0, 1.875},
111     {1.75, -0.98, 1.875}, {0.98, -1.75, 1.875}, {0, -1.75,
112     1.875}, {2, 0, 1.35}, {2, -1.12, 1.35}, {1.12, -2, 1.35},
113     {0, -2, 1.35}, {2, 0, 0.9}, {2, -1.12, 0.9}, {1.12, -2,
114     0.9}, {0, -2, 0.9}, {-2, 0, 0.9}, {2, 0, 0.45}, {2, -1.12,
115     0.45}, {1.12, -2, 0.45}, {0, -2, 0.45}, {1.5, 0, 0.225},
116     {1.5, -0.84, 0.225}, {0.84, -1.5, 0.225}, {0, -1.5, 0.225},
117     {1.5, 0, 0.15}, {1.5, -0.84, 0.15}, {0.84, -1.5, 0.15}, {0,
118     -1.5, 0.15}, {-1.6, 0, 2.025}, {-1.6, -0.3, 2.025}, {-1.5,
119     -0.3, 2.25}, {-1.5, 0, 2.25}, {-2.3, 0, 2.025}, {-2.3, -0.3,
120     2.025}, {-2.5, -0.3, 2.25}, {-2.5, 0, 2.25}, {-2.7, 0,
121     2.025}, {-2.7, -0.3, 2.025}, {-3, -0.3, 2.25}, {-3, 0,
122     2.25}, {-2.7, 0, 1.8}, {-2.7, -0.3, 1.8}, {-3, -0.3, 1.8},
123     {-3, 0, 1.8}, {-2.7, 0, 1.575}, {-2.7, -0.3, 1.575}, {-3,
124     -0.3, 1.35}, {-3, 0, 1.35}, {-2.5, 0, 1.125}, {-2.5, -0.3,
125     1.125}, {-2.65, -0.3, 0.9375}, {-2.65, 0, 0.9375}, {-2,
126     -0.3, 0.9}, {-1.9, -0.3, 0.6}, {-1.9, 0, 0.6}, {1.7, 0,
127     1.425}, {1.7, -0.66, 1.425}, {1.7, -0.66, 0.6}, {1.7, 0,
128     0.6}, {2.6, 0, 1.425}, {2.6, -0.66, 1.425}, {3.1, -0.66,
129     0.825}, {3.1, 0, 0.825}, {2.3, 0, 2.1}, {2.3, -0.25, 2.1},
130     {2.4, -0.25, 2.025}, {2.4, 0, 2.025}, {2.7, 0, 2.4}, {2.7,
131     -0.25, 2.4}, {3.3, -0.25, 2.4}, {3.3, 0, 2.4}, {2.8, 0,
132     2.475}, {2.8, -0.25, 2.475}, {3.525, -0.25, 2.49375},
133     {3.525, 0, 2.49375}, {2.9, 0, 2.475}, {2.9, -0.15, 2.475},
134     {3.45, -0.15, 2.5125}, {3.45, 0, 2.5125}, {2.8, 0, 2.4},
135     {2.8, -0.15, 2.4}, {3.2, -0.15, 2.4}, {3.2, 0, 2.4}, {0, 0,
136     3.15}, {0.8, 0, 3.15}, {0.8, -0.45, 3.15}, {0.45, -0.8,
137     3.15}, {0, -0.8, 3.15}, {0, 0, 2.85}, {1.4, 0, 2.4}, {1.4,
138     -0.784, 2.4}, {0.784, -1.4, 2.4}, {0, -1.4, 2.4}, {0.4, 0,
139     2.55}, {0.4, -0.224, 2.55}, {0.224, -0.4, 2.55}, {0, -0.4,
140     2.55}, {1.3, 0, 2.55}, {1.3, -0.728, 2.55}, {0.728, -1.3,
141     2.55}, {0, -1.3, 2.55}, {1.3, 0, 2.4}, {1.3, -0.728, 2.4},
142     {0.728, -1.3, 2.4}, {0, -1.3, 2.4}, {0, 0, 0}, {1.425,
143     -0.798, 0}, {1.5, 0, 0.075}, {1.425, 0, 0}, {0.798, -1.425,
144     0}, {0, -1.5, 0.075}, {0, -1.425, 0}, {1.5, -0.84, 0.075},
145     {0.84, -1.5, 0.075}
146 };
147
148 static float tex[2][2][2] =
149 {
150   { {0, 0},
151     {1, 0}},
152   { {0, 1},
153     {1, 1}}
154 };
155
156
157 int
158 unit_teapot (int grid, int wire_p)
159 {
160   GLenum type = wire_p ? GL_LINE : GL_FILL;
161   float p[4][4][3], q[4][4][3], r[4][4][3], s[4][4][3];
162   long i, j, k, l;
163   int polys = 0;
164
165   glPushAttrib(GL_ENABLE_BIT | GL_EVAL_BIT);
166   glEnable(GL_AUTO_NORMAL);
167   glEnable(GL_NORMALIZE);
168   glEnable(GL_MAP2_VERTEX_3);
169   glEnable(GL_MAP2_TEXTURE_COORD_2);
170   glFrontFace (GL_CW);
171   glPushMatrix();
172   glRotatef(270.0, 1.0, 0.0, 0.0);
173   glScalef(0.5, 0.5, 0.5);
174   glTranslatef(0.0, 0.0, -1.5);
175   for (i = 0; i < 10; i++) {
176     for (j = 0; j < 4; j++) {
177       for (k = 0; k < 4; k++) {
178         for (l = 0; l < 3; l++) {
179           p[j][k][l] = cpdata[patchdata[i][j * 4 + k]][l];
180           q[j][k][l] = cpdata[patchdata[i][j * 4 + (3 - k)]][l];
181           if (l == 1)
182             q[j][k][l] *= -1.0;
183           if (i < 6) {
184             r[j][k][l] =
185               cpdata[patchdata[i][j * 4 + (3 - k)]][l];
186             if (l == 0)
187               r[j][k][l] *= -1.0;
188             s[j][k][l] = cpdata[patchdata[i][j * 4 + k]][l];
189             if (l == 0)
190               s[j][k][l] *= -1.0;
191             if (l == 1)
192               s[j][k][l] *= -1.0;
193           }
194         }
195       }
196     }
197     glMap2f(GL_MAP2_TEXTURE_COORD_2, 0, 1, 2, 2, 0, 1, 4, 2,
198       &tex[0][0][0]);
199     glMap2f(GL_MAP2_VERTEX_3, 0, 1, 3, 4, 0, 1, 12, 4,
200       &p[0][0][0]);
201     glMapGrid2f(grid, 0.0, 1.0, grid, 0.0, 1.0);
202     glEvalMesh2(type, 0, grid, 0, grid);
203     polys += grid*grid*2;
204     glMap2f(GL_MAP2_VERTEX_3, 0, 1, 3, 4, 0, 1, 12, 4,
205       &q[0][0][0]);
206     glEvalMesh2(type, 0, grid, 0, grid);
207     polys += grid*grid*2;
208     if (i < 6) {
209       glMap2f(GL_MAP2_VERTEX_3, 0, 1, 3, 4, 0, 1, 12, 4,
210         &r[0][0][0]);
211       glEvalMesh2(type, 0, grid, 0, grid);
212       polys += grid*grid*2;
213       glMap2f(GL_MAP2_VERTEX_3, 0, 1, 3, 4, 0, 1, 12, 4,
214         &s[0][0][0]);
215       glEvalMesh2(type, 0, grid, 0, grid);
216       polys += grid*grid*2;
217     }
218   }
219   glPopMatrix();
220   glPopAttrib();
221
222   return polys;
223 }
224
225 #else  /* !HAVE_GLMAP */
226
227 # include "normals.h"
228 # include "teapot2.h"
229
230 int
231 unit_teapot (int grid, int wire_p)
232 {
233   int polys = sizeof (teapot_triangles) / sizeof (*teapot_triangles) / 9;
234   int i;
235   const GLfloat *p = teapot_triangles;
236   GLfloat scale = 1 / 2.3;
237
238   glPushMatrix();
239   glScalef (scale, scale, scale);
240   glTranslatef (0, -1.25, 0);
241
242   if (wire_p)
243     {
244       glBegin (GL_LINES);
245       for (i = 0; i < polys; i++)
246         {
247           XYZ p1, p2, p3;
248           p1.x = *p++; p1.y = *p++; p1.z = *p++;
249           p2.x = *p++; p2.y = *p++; p2.z = *p++;
250           p3.x = *p++; p3.y = *p++; p3.z = *p++;
251           glVertex3f (p1.x, p1.y, p1.z);   /* Draw 2 edges of each triangle */
252           glVertex3f (p2.x, p2.y, p2.z);
253           glVertex3f (p1.x, p1.y, p1.z);
254           glVertex3f (p3.x, p3.y, p3.z);
255           i++;                             /* Skip every other triangle */
256           p += 9;
257         }
258       glEnd();
259       polys /= 2;
260     }
261   else
262     {
263       glFrontFace (GL_CCW);
264       glBegin (GL_TRIANGLES);
265       for (i = 0; i < polys; i++)
266         {
267           XYZ p1, p2, p3;
268           p1.x = *p++; p1.y = *p++; p1.z = *p++;
269           p2.x = *p++; p2.y = *p++; p2.z = *p++;
270           p3.x = *p++; p3.y = *p++; p3.z = *p++;
271           do_normal (p1.x, p1.y, p1.z,
272                      p2.x, p2.y, p2.z,
273                      p3.x, p3.y, p3.z);
274           glVertex3f (p1.x, p1.y, p1.z);
275           glVertex3f (p2.x, p2.y, p2.z);
276           glVertex3f (p3.x, p3.y, p3.z);
277         }
278       glEnd();
279     }
280   glPopMatrix();
281
282   return polys;
283 }
284
285 #endif /* !HAVE_GLMAP */