]> git.hungrycats.org Git - xscreensaver/blob - hacks/glx/teapot.c
From https://www.jwz.org/xscreensaver/xscreensaver-6.09.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 #include "screenhackI.h"
48 #include "teapot.h"
49
50 #ifndef HAVE_JWZGLES
51 # define HAVE_GLMAP
52 #endif
53
54
55 #ifdef HAVE_GLMAP
56
57 /* Rim, body, lid, and bottom data must be reflected in x
58    and y; handle and spout data across the y axis only.  */
59
60 static long patchdata[][16] =
61 {
62     /* rim */
63   {102, 103, 104, 105, 4, 5, 6, 7, 8, 9, 10, 11,
64     12, 13, 14, 15},
65     /* body */
66   {12, 13, 14, 15, 16, 17, 18, 19, 20, 21, 22, 23,
67     24, 25, 26, 27},
68   {24, 25, 26, 27, 29, 30, 31, 32, 33, 34, 35, 36,
69     37, 38, 39, 40},
70     /* lid */
71   {96, 96, 96, 96, 97, 98, 99, 100, 101, 101, 101,
72     101, 0, 1, 2, 3,},
73   {0, 1, 2, 3, 106, 107, 108, 109, 110, 111, 112,
74     113, 114, 115, 116, 117},
75     /* bottom */
76   {118, 118, 118, 118, 124, 122, 119, 121, 123, 126,
77     125, 120, 40, 39, 38, 37},
78     /* handle */
79   {41, 42, 43, 44, 45, 46, 47, 48, 49, 50, 51, 52,
80     53, 54, 55, 56},
81   {53, 54, 55, 56, 57, 58, 59, 60, 61, 62, 63, 64,
82     28, 65, 66, 67},
83     /* spout */
84   {68, 69, 70, 71, 72, 73, 74, 75, 76, 77, 78, 79,
85     80, 81, 82, 83},
86   {80, 81, 82, 83, 84, 85, 86, 87, 88, 89, 90, 91,
87     92, 93, 94, 95}
88 };
89 /* *INDENT-OFF* */
90
91 static float cpdata[][3] =
92 {
93     {0.2, 0, 2.7}, {0.2, -0.112, 2.7}, {0.112, -0.2, 2.7}, {0,
94     -0.2, 2.7}, {1.3375, 0, 2.53125}, {1.3375, -0.749, 2.53125},
95     {0.749, -1.3375, 2.53125}, {0, -1.3375, 2.53125}, {1.4375,
96     0, 2.53125}, {1.4375, -0.805, 2.53125}, {0.805, -1.4375,
97     2.53125}, {0, -1.4375, 2.53125}, {1.5, 0, 2.4}, {1.5, -0.84,
98     2.4}, {0.84, -1.5, 2.4}, {0, -1.5, 2.4}, {1.75, 0, 1.875},
99     {1.75, -0.98, 1.875}, {0.98, -1.75, 1.875}, {0, -1.75,
100     1.875}, {2, 0, 1.35}, {2, -1.12, 1.35}, {1.12, -2, 1.35},
101     {0, -2, 1.35}, {2, 0, 0.9}, {2, -1.12, 0.9}, {1.12, -2,
102     0.9}, {0, -2, 0.9}, {-2, 0, 0.9}, {2, 0, 0.45}, {2, -1.12,
103     0.45}, {1.12, -2, 0.45}, {0, -2, 0.45}, {1.5, 0, 0.225},
104     {1.5, -0.84, 0.225}, {0.84, -1.5, 0.225}, {0, -1.5, 0.225},
105     {1.5, 0, 0.15}, {1.5, -0.84, 0.15}, {0.84, -1.5, 0.15}, {0,
106     -1.5, 0.15}, {-1.6, 0, 2.025}, {-1.6, -0.3, 2.025}, {-1.5,
107     -0.3, 2.25}, {-1.5, 0, 2.25}, {-2.3, 0, 2.025}, {-2.3, -0.3,
108     2.025}, {-2.5, -0.3, 2.25}, {-2.5, 0, 2.25}, {-2.7, 0,
109     2.025}, {-2.7, -0.3, 2.025}, {-3, -0.3, 2.25}, {-3, 0,
110     2.25}, {-2.7, 0, 1.8}, {-2.7, -0.3, 1.8}, {-3, -0.3, 1.8},
111     {-3, 0, 1.8}, {-2.7, 0, 1.575}, {-2.7, -0.3, 1.575}, {-3,
112     -0.3, 1.35}, {-3, 0, 1.35}, {-2.5, 0, 1.125}, {-2.5, -0.3,
113     1.125}, {-2.65, -0.3, 0.9375}, {-2.65, 0, 0.9375}, {-2,
114     -0.3, 0.9}, {-1.9, -0.3, 0.6}, {-1.9, 0, 0.6}, {1.7, 0,
115     1.425}, {1.7, -0.66, 1.425}, {1.7, -0.66, 0.6}, {1.7, 0,
116     0.6}, {2.6, 0, 1.425}, {2.6, -0.66, 1.425}, {3.1, -0.66,
117     0.825}, {3.1, 0, 0.825}, {2.3, 0, 2.1}, {2.3, -0.25, 2.1},
118     {2.4, -0.25, 2.025}, {2.4, 0, 2.025}, {2.7, 0, 2.4}, {2.7,
119     -0.25, 2.4}, {3.3, -0.25, 2.4}, {3.3, 0, 2.4}, {2.8, 0,
120     2.475}, {2.8, -0.25, 2.475}, {3.525, -0.25, 2.49375},
121     {3.525, 0, 2.49375}, {2.9, 0, 2.475}, {2.9, -0.15, 2.475},
122     {3.45, -0.15, 2.5125}, {3.45, 0, 2.5125}, {2.8, 0, 2.4},
123     {2.8, -0.15, 2.4}, {3.2, -0.15, 2.4}, {3.2, 0, 2.4}, {0, 0,
124     3.15}, {0.8, 0, 3.15}, {0.8, -0.45, 3.15}, {0.45, -0.8,
125     3.15}, {0, -0.8, 3.15}, {0, 0, 2.85}, {1.4, 0, 2.4}, {1.4,
126     -0.784, 2.4}, {0.784, -1.4, 2.4}, {0, -1.4, 2.4}, {0.4, 0,
127     2.55}, {0.4, -0.224, 2.55}, {0.224, -0.4, 2.55}, {0, -0.4,
128     2.55}, {1.3, 0, 2.55}, {1.3, -0.728, 2.55}, {0.728, -1.3,
129     2.55}, {0, -1.3, 2.55}, {1.3, 0, 2.4}, {1.3, -0.728, 2.4},
130     {0.728, -1.3, 2.4}, {0, -1.3, 2.4}, {0, 0, 0}, {1.425,
131     -0.798, 0}, {1.5, 0, 0.075}, {1.425, 0, 0}, {0.798, -1.425,
132     0}, {0, -1.5, 0.075}, {0, -1.425, 0}, {1.5, -0.84, 0.075},
133     {0.84, -1.5, 0.075}
134 };
135
136 static float tex[2][2][2] =
137 {
138   { {0, 0},
139     {1, 0}},
140   { {0, 1},
141     {1, 1}}
142 };
143
144
145 int
146 unit_teapot (int grid, int wire_p)
147 {
148   GLenum type = wire_p ? GL_LINE : GL_FILL;
149   float p[4][4][3], q[4][4][3], r[4][4][3], s[4][4][3];
150   long i, j, k, l;
151   int polys = 0;
152
153   glPushAttrib(GL_ENABLE_BIT | GL_EVAL_BIT);
154   glEnable(GL_AUTO_NORMAL);
155   glEnable(GL_NORMALIZE);
156   glEnable(GL_MAP2_VERTEX_3);
157   glEnable(GL_MAP2_TEXTURE_COORD_2);
158   glFrontFace (GL_CW);
159   glPushMatrix();
160   glRotatef(270.0, 1.0, 0.0, 0.0);
161   glScalef(0.5, 0.5, 0.5);
162   glTranslatef(0.0, 0.0, -1.5);
163   for (i = 0; i < 10; i++) {
164     for (j = 0; j < 4; j++) {
165       for (k = 0; k < 4; k++) {
166         for (l = 0; l < 3; l++) {
167           p[j][k][l] = cpdata[patchdata[i][j * 4 + k]][l];
168           q[j][k][l] = cpdata[patchdata[i][j * 4 + (3 - k)]][l];
169           if (l == 1)
170             q[j][k][l] *= -1.0;
171           if (i < 6) {
172             r[j][k][l] =
173               cpdata[patchdata[i][j * 4 + (3 - k)]][l];
174             if (l == 0)
175               r[j][k][l] *= -1.0;
176             s[j][k][l] = cpdata[patchdata[i][j * 4 + k]][l];
177             if (l == 0)
178               s[j][k][l] *= -1.0;
179             if (l == 1)
180               s[j][k][l] *= -1.0;
181           }
182         }
183       }
184     }
185     glMap2f(GL_MAP2_TEXTURE_COORD_2, 0, 1, 2, 2, 0, 1, 4, 2,
186       &tex[0][0][0]);
187     glMap2f(GL_MAP2_VERTEX_3, 0, 1, 3, 4, 0, 1, 12, 4,
188       &p[0][0][0]);
189     glMapGrid2f(grid, 0.0, 1.0, grid, 0.0, 1.0);
190     glEvalMesh2(type, 0, grid, 0, grid);
191     polys += grid*grid*2;
192     glMap2f(GL_MAP2_VERTEX_3, 0, 1, 3, 4, 0, 1, 12, 4,
193       &q[0][0][0]);
194     glEvalMesh2(type, 0, grid, 0, grid);
195     polys += grid*grid*2;
196     if (i < 6) {
197       glMap2f(GL_MAP2_VERTEX_3, 0, 1, 3, 4, 0, 1, 12, 4,
198         &r[0][0][0]);
199       glEvalMesh2(type, 0, grid, 0, grid);
200       polys += grid*grid*2;
201       glMap2f(GL_MAP2_VERTEX_3, 0, 1, 3, 4, 0, 1, 12, 4,
202         &s[0][0][0]);
203       glEvalMesh2(type, 0, grid, 0, grid);
204       polys += grid*grid*2;
205     }
206   }
207   glPopMatrix();
208   glPopAttrib();
209
210   return polys;
211 }
212
213 #else  /* !HAVE_GLMAP */
214
215 # include "normals.h"
216 # include "teapot2.h"
217
218 int
219 unit_teapot (int grid, int wire_p)
220 {
221   int polys = sizeof (teapot_triangles) / sizeof (*teapot_triangles) / 9;
222   int i;
223   const GLfloat *p = teapot_triangles;
224   GLfloat scale = 1 / 2.3;
225
226   glPushMatrix();
227   glScalef (scale, scale, scale);
228   glTranslatef (0, -1.25, 0);
229
230   if (wire_p)
231     {
232       glBegin (GL_LINES);
233       for (i = 0; i < polys; i++)
234         {
235           XYZ p1, p2, p3;
236           p1.x = *p++; p1.y = *p++; p1.z = *p++;
237           p2.x = *p++; p2.y = *p++; p2.z = *p++;
238           p3.x = *p++; p3.y = *p++; p3.z = *p++;
239           glVertex3f (p1.x, p1.y, p1.z);   /* Draw 2 edges of each triangle */
240           glVertex3f (p2.x, p2.y, p2.z);
241           glVertex3f (p1.x, p1.y, p1.z);
242           glVertex3f (p3.x, p3.y, p3.z);
243           i++;                             /* Skip every other triangle */
244           p += 9;
245         }
246       glEnd();
247       polys /= 2;
248     }
249   else
250     {
251       glFrontFace (GL_CCW);
252       glBegin (GL_TRIANGLES);
253       for (i = 0; i < polys; i++)
254         {
255           XYZ p1, p2, p3;
256           p1.x = *p++; p1.y = *p++; p1.z = *p++;
257           p2.x = *p++; p2.y = *p++; p2.z = *p++;
258           p3.x = *p++; p3.y = *p++; p3.z = *p++;
259           do_normal (p1.x, p1.y, p1.z,
260                      p2.x, p2.y, p2.z,
261                      p3.x, p3.y, p3.z);
262           glVertex3f (p1.x, p1.y, p1.z);
263           glVertex3f (p2.x, p2.y, p2.z);
264           glVertex3f (p3.x, p3.y, p3.z);
265         }
266       glEnd();
267     }
268   glPopMatrix();
269
270   return polys;
271 }
272
273 #endif /* !HAVE_GLMAP */