-/* $Id: tess.c,v 1.14 1999/10/12 18:49:28 gareth Exp $ */
/*
* Mesa 3-D graphics library
- * Version: 3.1
+ * Version: 3.3
+ * Copyright (C) 1995-2000 Brian Paul
*
- * Copyright (C) 1999 Brian Paul All Rights Reserved.
+ * 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.
*
- * Permission is hereby granted, free of charge, to any person obtaining a
- * copy of this software and associated documentation files (the "Software"),
- * to deal in the Software without restriction, including without limitation
- * the rights to use, copy, modify, merge, publish, distribute, sublicense,
- * and/or sell copies of the Software, and to permit persons to whom the
- * Software is furnished to do so, subject to the following conditions:
+ * 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.
*
- * The above copyright notice and this permission notice shall be included
- * in all copies or substantial portions of the Software.
- *
- * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS
- * OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
- * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL
- * BRIAN PAUL BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER LIABILITY, WHETHER IN
- * AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN
- * CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE SOFTWARE.
+ * 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.
*/
+
/*
- * $Log: tess.c,v $
- * Revision 1.14 1999/10/12 18:49:28 gareth
- * Updated memory allocation to allow new macros to be used.
- *
- * Revision 1.13 1999/10/11 17:53:09 gareth
- * Renamed GLUtesselator user data pointer to avoid confusion.
- *
- * Revision 1.12 1999/10/11 17:48:53 gareth
- * Correctly initialized GLUtesselator user data pointer.
- *
- * Revision 1.11 1999/10/11 17:26:48 gareth
- * Updated debugging output. I'm going to change it all to something
- * much more like the GLX project. This was a set of macros left over
- * from a research project I'd done, and I like the GLX logging more.
- *
- * Revision 1.10 1999/10/03 00:56:07 gareth
- * Added tessellation winding rule support. Misc bug fixes.
- *
- * Revision 1.9 1999/09/17 06:34:46 gareth
- * Winding rule updates.
- *
- * Revision 1.8 1999/09/17 03:07:28 tjump
- * Win32 build req't updates
- *
- * Revision 1.7 1999/09/16 06:41:42 gareth
- * Misc winding rule bug fixes.
- *
- * Revision 1.6 1999/09/15 02:11:10 gareth
- * Fixed vector macro calls, specifically COPY_3V params.
- *
- * Revision 1.5 1999/09/14 05:37:58 gareth
- * Fixed legacy gluNextContour impact on gluTessEndContour.
- *
- * Revision 1.4 1999/09/13 22:20:13 gareth
- * Fixed file headers. Tracking down macro bugs.
- *
+ * This file is part of the polygon tesselation code contributed by
+ * Bogdan Sikorski
*/
-/*****************************************************************************
- *
- * GLU 1.3 Polygon Tessellation by Gareth Hughes <garethh@lucent.com>
- *
- *****************************************************************************/
-#include <stdarg.h>
-#include <stdio.h>
+#ifdef PC_HEADER
+#include "all.h"
+#else
+#include <math.h>
#include <stdlib.h>
-#include <GL/glu.h>
-
#include "tess.h"
-#include "tess_macros.h"
-#include "tess_fist.h"
-#if 0
-#include "tess_grid.h"
#endif
-/*****************************************************************************
- * Internal function prototypes:
- *****************************************************************************/
-
-static void init_callbacks( tess_callbacks_t *callbacks );
-
-static void tess_cleanup( GLUtesselator *tobj );
-static void inspect_current_contour( GLUtesselator *tobj );
-
-static void delete_current_contour( GLUtesselator *tobj );
-static void delete_all_contours( GLUtesselator *tobj );
-
-#define TESS_CHECK_ERRORS(t) if ( (t)->error != GLU_NO_ERROR ) goto cleanup
-
-
-/*****************************************************************************
- *
- * GLU TESSELLATION FUNCTIONS
- *
- *****************************************************************************/
-
-/*****************************************************************************
- * gluNewTess
- *****************************************************************************/
-GLUtesselator* GLAPIENTRY gluNewTess( void )
-{
- GLUtesselator *tobj;
-
- DEBUGP( 15, ( "-> gluNewTess()\n" ) );
-
- tobj = malloc( sizeof(GLUtesselator) );
- if ( tobj == NULL ) {
- return NULL;
- }
-
- init_callbacks( &tobj->callbacks );
-
- tobj->boundary_only = GL_FALSE;
- tobj->winding_rule = GLU_TESS_WINDING_ODD;
- tobj->tolerance = 0.0;
-
- tobj->plane.normal[X] = 0.0;
- tobj->plane.normal[Y] = 0.0;
- tobj->plane.normal[Z] = 0.0;
- tobj->plane.dist = 0.0;
-
- tobj->contour_count = 0;
- tobj->contours = tobj->last_contour = NULL;
- tobj->current_contour = NULL;
-
- CLEAR_BBOX_2DV( tobj->mins, tobj->maxs );
-
- tobj->vertex_count = 0;
- tobj->sorted_vertices = NULL;
-#if 0
- tobj->grid = NULL;
+/*
+ * This is ugly, but seems the easiest way to do things to make the
+ * code work under YellowBox for Windows
+ */
+#if defined(OPENSTEP) && defined(CALLBACK)
+#undef CALLBACK
+#define CALLBACK
#endif
- tobj->cvc_lists = NULL;
- tobj->data = NULL;
- tobj->label = 0;
-
- tobj->error = GLU_NO_ERROR;
-
- DEBUGP( 15, ( "<- gluNewTess() tobj:%p\n", tobj ) );
- return tobj;
-}
-
-
-/*****************************************************************************
- * gluDeleteTess
- *****************************************************************************/
-void GLAPIENTRY gluDeleteTess( GLUtesselator *tobj )
-{
- DEBUGP( 15, ( "-> gluDeleteTess( tobj:%p )\n", tobj ) );
-
- if ( tobj->error == GLU_NO_ERROR && ( tobj->contour_count > 0 ) )
- {
- /* gluEndPolygon was not called. */
- DEBUGP( 0, ( "*** error 3 ***\n" ) );
- tess_error_callback( tobj, GLU_TESS_ERROR3 );
- }
-
- /* Delete all internal structures. */
- tess_cleanup( tobj );
- free( tobj );
-
- DEBUGP( 15, ( "<- gluDeleteTess()\n" ) );
-}
-
-
-/*****************************************************************************
- * gluTessBeginPolygon
- *****************************************************************************/
-void GLAPIENTRY gluTessBeginPolygon( GLUtesselator *tobj, void *polygon_data )
-{
- DEBUGP( 15, ( "-> gluTessBeginPolygon( tobj:%p data:%p )\n", tobj, polygon_data ) );
- tobj->error = GLU_NO_ERROR;
-
- if ( tobj->current_contour != NULL )
- {
- /* gluEndPolygon was not called. */
- DEBUGP( 0, ( "*** error 3 ***\n" ) );
- tess_error_callback( tobj, GLU_TESS_ERROR3 );
-
- tess_cleanup( tobj );
- }
-
- tobj->data = polygon_data;
- tobj->vertex_count = 0;
-
- DEBUGP( 15, ( "<- gluTessBeginPolygon( tobj:%p data:%p )\n", tobj, polygon_data ) );
-}
-
-
-/*****************************************************************************
- * gluTessBeginContour
- *****************************************************************************/
-void GLAPIENTRY gluTessBeginContour( GLUtesselator *tobj )
-{
- DEBUGP( 15, ( " -> gluTessBeginContour( tobj:%p )\n", tobj ) );
- TESS_CHECK_ERRORS( tobj );
-
- if ( tobj->current_contour != NULL )
- {
- /* gluTessEndContour was not called. */
- DEBUGP( 0, ( "*** error 4 ***\n" ) );
- tess_error_callback( tobj, GLU_TESS_ERROR4 );
- return;
- }
-
- tobj->current_contour = malloc( sizeof(tess_contour_t) );
- if ( tobj->current_contour == NULL ) {
- tess_error_callback( tobj, GLU_OUT_OF_MEMORY );
- return;
- }
-
- COPY_3V( tobj->current_contour->plane.normal, tobj->plane.normal );
- tobj->current_contour->plane.dist = tobj->plane.dist;
-
- tobj->current_contour->vertex_count = 0;
- tobj->current_contour->vertices =
- tobj->current_contour->last_vertex = NULL;
-
- tobj->current_contour->reflex_vertices = NULL;
- tobj->current_contour->cross_vertices = hashtable_init( HT_DEFAULT_SIZE );
-
- tobj->current_contour->orientation = GLU_UNKNOWN;
- tobj->current_contour->area = 0.0;
-
- tobj->current_contour->label = 0;
- CLEAR_BBOX_2DV( tobj->current_contour->mins,
- tobj->current_contour->maxs );
-
- tobj->current_contour->rotx = tobj->current_contour->roty = 0.0;
-
- cleanup:
- DEBUGP( 15, ( " <- gluTessBeginContour( tobj:%p )\n", tobj ) );
- return;
-}
-
-
-/*****************************************************************************
- * gluTessVertex
- *****************************************************************************/
-void GLAPIENTRY gluTessVertex( GLUtesselator *tobj, GLdouble coords[3],
- void *vertex_data )
-{
- tess_contour_t *current = tobj->current_contour;
- tess_vertex_t *last_vertex;
-
- DEBUGP( 15, ( " -> gluTessVertex( tobj:%p coords:(%.2f,%.2f,%.2f) )\n", tobj, coords[0], coords[1], coords[2] ) );
- TESS_CHECK_ERRORS( tobj );
-
- if ( current == NULL )
- {
- /* gluTessBeginContour was not called. */
- DEBUGP( 0, ( "*** error 2 ***\n" ) );
- tess_error_callback( tobj, GLU_TESS_ERROR2 );
- return;
- }
-
- tobj->vertex_count++;
-
- last_vertex = current->last_vertex;
-
- if ( last_vertex == NULL )
- {
- last_vertex = malloc( sizeof(tess_vertex_t) );
- if ( last_vertex == NULL ) {
- tess_error_callback( tobj, GLU_OUT_OF_MEMORY );
- return;
- }
-
- current->vertices = last_vertex;
- current->last_vertex = last_vertex;
-
- last_vertex->index = -1;
- last_vertex->data = vertex_data;
-
- last_vertex->coords[X] = coords[X];
- last_vertex->coords[Y] = coords[Y];
- last_vertex->coords[Z] = coords[Z];
-
- last_vertex->side = 0.0;
- last_vertex->label = 0;
- last_vertex->mark = 0;
-
- last_vertex->next = NULL;
- last_vertex->previous = NULL;
-
- current->vertex_count++;
- }
- else
- {
- tess_vertex_t *vertex;
-
- vertex = malloc( sizeof(tess_vertex_t) );
- if ( vertex == NULL ) {
- tess_error_callback( tobj, GLU_OUT_OF_MEMORY );
- return;
- }
-
- vertex->index = -1;
- vertex->data = vertex_data;
-
- vertex->coords[X] = coords[X];
- vertex->coords[Y] = coords[Y];
- vertex->coords[Z] = coords[Z];
-
- vertex->side = 0.0;
- vertex->label = 0;
- vertex->mark = 0;
-
- vertex->next = NULL;
- vertex->previous = last_vertex;
-
- current->vertex_count++;
-
- last_vertex->next = vertex;
- current->last_vertex = vertex;
- }
-
- cleanup:
- DEBUGP( 15, ( " <- gluTessVertex( tobj:%p )\n", tobj ) );
- return;
-}
-
-
-/*****************************************************************************
- * gluTessEndContour
- *****************************************************************************/
-void GLAPIENTRY gluTessEndContour( GLUtesselator *tobj )
-{
- DEBUGP( 15, ( " -> gluTessEndContour( tobj:%p )\n", tobj ) );
- TESS_CHECK_ERRORS( tobj );
-
- if ( tobj->current_contour == NULL )
- {
- /* gluTessBeginContour was not called. */
- DEBUGP( 0, ( "*** error 2 ***\n" ) );
- tess_error_callback( tobj, GLU_TESS_ERROR2 );
- return;
- }
-
- if ( tobj->current_contour->vertex_count > 0 )
- {
- inspect_current_contour( tobj );
- }
- else
- {
- delete_current_contour( tobj );
- }
-
- cleanup:
- DEBUGP( 15, ( " <- gluTessEndContour( tobj:%p )\n", tobj ) );
- return;
-}
-
-
-/*****************************************************************************
- * gluTessEndPolygon
- *****************************************************************************/
-void GLAPIENTRY gluTessEndPolygon( GLUtesselator *tobj )
-{
- DEBUGP( 15, ( "-> gluTessEndPolygon( tobj:%p )\n", tobj ) );
- TESS_CHECK_ERRORS( tobj );
-
- if ( tobj->current_contour != NULL )
- {
- /* gluTessBeginPolygon was not called. */
- DEBUGP( 0, ( "*** error 1 ***\n" ) );
- tess_error_callback( tobj, GLU_TESS_ERROR1 );
- return;
- }
- TESS_CHECK_ERRORS( tobj );
-
- /*
- * Ensure we have at least one contour to tessellate. If we have none,
- * clean up and exit gracefully.
- */
- if ( tobj->contour_count == 0 )
- {
- tess_cleanup( tobj );
- return;
- }
-
- /* Wrap the contour list. */
-
- tobj->last_contour->next = tobj->contours;
- tobj->contours->previous = tobj->last_contour;
-
- TESS_CHECK_ERRORS( tobj );
-
- /*
- * Before we tessellate the contours, ensure we have the appropriate
- * callbacks registered. We at least need the begin, vertex and end
- * callbacks to do any meaningful work.
- */
- if ( ( ( tobj->callbacks.begin != NULL ) ||
- ( tobj->callbacks.beginData != NULL ) ) &&
- ( ( tobj->callbacks.vertex != NULL ) ||
- ( tobj->callbacks.vertexData != NULL ) ) &&
- ( ( tobj->callbacks.end != NULL ) ||
- ( tobj->callbacks.endData != NULL ) ) )
- {
- fist_tessellation( tobj );
- }
-
- cleanup:
- delete_all_contours( tobj );
- DEBUGP( 15, ( "<- gluTessEndPolygon( tobj:%p )\n", tobj ) );
-}
-
-
-/*****************************************************************************
- * gluTessCallback
- *****************************************************************************/
-void GLAPIENTRY gluTessCallback( GLUtesselator *tobj, GLenum which,
- void (GLCALLBACK *fn)() )
-{
- switch ( which )
- {
- /* Register the begin callbacks. */
- case GLU_TESS_BEGIN:
- tobj->callbacks.begin = (void (GLCALLBACK*)(GLenum)) fn;
- break;
- case GLU_TESS_BEGIN_DATA:
- tobj->callbacks.beginData = (void (GLCALLBACK*)(GLenum, void *)) fn;
- break;
-
- /* Register the edge flag callbacks. */
- case GLU_TESS_EDGE_FLAG:
- tobj->callbacks.edgeFlag = (void (GLCALLBACK*)(GLboolean)) fn;
- break;
- case GLU_TESS_EDGE_FLAG_DATA:
- tobj->callbacks.edgeFlagData =
- (void (GLCALLBACK*)(GLboolean, void *)) fn;
- break;
-
- /* Register the vertex callbacks. */
- case GLU_TESS_VERTEX:
- tobj->callbacks.vertex = (void (GLCALLBACK*)(void *)) fn;
- break;
- case GLU_TESS_VERTEX_DATA:
- tobj->callbacks.vertexData = (void (GLCALLBACK*)(void *, void *)) fn;
- break;
-
- /* Register the end callbacks. */
- case GLU_TESS_END:
- tobj->callbacks.end = (void (GLCALLBACK*)(void)) fn;
- break;
- case GLU_TESS_END_DATA:
- tobj->callbacks.endData = (void (GLCALLBACK*)(void *)) fn;
- break;
-
- /* Register the error callbacks. */
- case GLU_TESS_ERROR:
- tobj->callbacks.error = (void (GLCALLBACK*)(GLenum)) fn;
- break;
- case GLU_TESS_ERROR_DATA:
- tobj->callbacks.errorData = (void (GLCALLBACK*)(GLenum, void *)) fn;
- break;
-
- /* Register the combine callbacks. */
- case GLU_TESS_COMBINE:
- tobj->callbacks.combine =
- (void (GLCALLBACK*)(GLdouble[3], void *[4],
- GLfloat [4], void **)) fn;
- break;
- case GLU_TESS_COMBINE_DATA:
- tobj->callbacks.combineData =
- (void (GLCALLBACK*)(GLdouble[3], void *[4], GLfloat [4],
- void **, void *)) fn;
- break;
-
- default:
- DEBUGP( 0, ( " gluTessCallback( tobj:%p which:%d ) invalid enum\n", tobj, which ) );
- tobj->error = GLU_INVALID_ENUM;
- break;
- }
-}
-
-
-/*****************************************************************************
- * gluTessProperty
- *
- * Set the current value of the given property.
- *****************************************************************************/
-void GLAPIENTRY gluTessProperty( GLUtesselator *tobj, GLenum which,
- GLdouble value )
-{
- switch ( which )
- {
- case GLU_TESS_BOUNDARY_ONLY:
- tobj->boundary_only = (GLboolean) value;
- break;
-
- case GLU_TESS_TOLERANCE:
- DEBUGP( 15, ( " gluTessProperty( tobj:%p ) tolerance: %0.9f\n", tobj, value ) );
- tobj->tolerance = value;
- break;
-
- case GLU_TESS_WINDING_RULE:
- tobj->winding_rule = (GLenum) value;
- break;
-
- default:
- DEBUGP( 0, ( " gluTessProperty( tobj:%p which:%d ) invalid enum\n", tobj, which ) );
- tobj->error = GLU_INVALID_ENUM;
- break;
- }
-}
-
-
-/*****************************************************************************
- * gluGetTessProperty
- *
- * Return the current value of the given property.
- *****************************************************************************/
-void GLAPIENTRY gluGetTessProperty( GLUtesselator *tobj, GLenum which,
- GLdouble *value )
-{
- switch ( which )
- {
- case GLU_TESS_BOUNDARY_ONLY:
- *value = tobj->boundary_only;
- break;
-
- case GLU_TESS_TOLERANCE:
- *value = tobj->tolerance;
- break;
-
- case GLU_TESS_WINDING_RULE:
- *value = tobj->winding_rule;
- break;
-
- default:
- DEBUGP( 0, ( " gluGetTessProperty( tobj:%p which:%d ) invalid enum\n", tobj, which ) );
- tobj->error = GLU_INVALID_ENUM;
- break;
- }
-}
-
-
-/*****************************************************************************
- * gluTessNormal
- *
- * Set the current tessellation normal.
- *****************************************************************************/
-void GLAPIENTRY gluTessNormal( GLUtesselator *tobj, GLdouble x,
- GLdouble y, GLdouble z )
-{
- DEBUGP( 15, ( " gluTessNormal( tobj:%p n:(%.2f,%.2f,%.2f) )\n", tobj, x, y, z ) );
-
- tobj->plane.normal[X] = x;
- tobj->plane.normal[Y] = y;
- tobj->plane.normal[Z] = z;
-}
+static void delete_contours(GLUtriangulatorObj *);
+#ifdef __CYGWIN32__
+#define _CALLBACK
+#else
+#define _CALLBACK GLCALLBACK
+#endif
-/*****************************************************************************
- *
- * OBSOLETE TESSELLATION FUNCTIONS
- *
- *****************************************************************************/
-void GLAPIENTRY gluBeginPolygon( GLUtesselator *tobj )
+static void
+init_callbacks(tess_callbacks * callbacks)
{
- gluTessBeginPolygon( tobj, NULL );
- gluTessBeginContour( tobj );
+ callbacks->begin = (void (_CALLBACK *) (GLenum)) 0;
+ callbacks->edgeFlag = (void (_CALLBACK *) (GLboolean)) 0;
+ callbacks->vertex = (void (_CALLBACK *) (void *)) 0;
+ callbacks->end = (void (_CALLBACK *) (void)) 0;
+ callbacks->error = (void (_CALLBACK *) (GLenum)) 0;
}
-void GLAPIENTRY gluNextContour( GLUtesselator *tobj, GLenum type )
+void
+tess_call_user_error(GLUtriangulatorObj * tobj, GLenum gluerr)
{
- gluTessEndContour( tobj );
- gluTessBeginContour( tobj );
+ if (tobj->error == GLU_NO_ERROR)
+ tobj->error = gluerr;
+ if (tobj->callbacks.error != NULL)
+ (tobj->callbacks.error) (gluerr);
}
-void GLAPIENTRY gluEndPolygon( GLUtesselator *tobj )
+GLUtriangulatorObj *GLAPIENTRY
+gluNewTess(void)
{
- gluTessEndContour( tobj );
- gluTessEndPolygon( tobj );
+ GLUtriangulatorObj *tobj;
+
+ if ((tobj = (GLUtriangulatorObj *)
+ malloc(sizeof(struct GLUtesselator))) == NULL)
+ return NULL;
+ tobj->contours = tobj->last_contour = NULL;
+ init_callbacks(&tobj->callbacks);
+ tobj->error = GLU_NO_ERROR;
+ tobj->current_polygon = NULL;
+ tobj->contour_cnt = 0;
+ return tobj;
}
-
-/*****************************************************************************
- * tess_error_callback
- *
- * Internal error handler. Call the user-registered error callback.
- *
- * 2nd arg changed from 'errno' to 'errnum' since MSVC defines errnum as
- * a macro (of all things) and thus breaks the build -tjump
- *****************************************************************************/
-
-void tess_error_callback( GLUtesselator *tobj, GLenum errnum )
+void GLAPIENTRY
+gluTessCallback(GLUtriangulatorObj * tobj, GLenum which,
+ void (GLCALLBACK * fn) ())
{
- if ( tobj->error == GLU_NO_ERROR )
- {
- tobj->error = errnum;
- }
-
- if ( tobj->callbacks.errorData != NULL )
- {
- ( tobj->callbacks.errorData )( errnum, tobj->data );
- }
- else if ( tobj->callbacks.error != NULL )
- {
- ( tobj->callbacks.error )( errnum );
- }
+ switch (which) {
+ case GLU_BEGIN:
+ tobj->callbacks.begin = (void (_CALLBACK *) (GLenum)) fn;
+ break;
+ case GLU_EDGE_FLAG:
+ tobj->callbacks.edgeFlag = (void (_CALLBACK *) (GLboolean)) fn;
+ break;
+ case GLU_VERTEX:
+ tobj->callbacks.vertex = (void (_CALLBACK *) (void *)) fn;
+ break;
+ case GLU_END:
+ tobj->callbacks.end = (void (_CALLBACK *) (void)) fn;
+ break;
+ case GLU_ERROR:
+ tobj->callbacks.error = (void (_CALLBACK *) (GLenum)) fn;
+ break;
+ default:
+ tobj->error = GLU_INVALID_ENUM;
+ break;
+ }
}
-/*****************************************************************************
- *
- * INTERNAL FUNCTIONS
- *
- *****************************************************************************/
-
-
-/*****************************************************************************
- * init_callbacks
- *****************************************************************************/
-static void init_callbacks( tess_callbacks_t *callbacks )
+void GLAPIENTRY
+gluDeleteTess(GLUtriangulatorObj * tobj)
{
- callbacks->begin = ( void (GLCALLBACK*)(GLenum) ) NULL;
- callbacks->beginData = ( void (GLCALLBACK*)(GLenum, void *) ) NULL;
- callbacks->edgeFlag = ( void (GLCALLBACK*)(GLboolean) ) NULL;
- callbacks->edgeFlagData = ( void (GLCALLBACK*)(GLboolean, void *) ) NULL;
- callbacks->vertex = ( void (GLCALLBACK*)(void *) ) NULL;
- callbacks->vertexData = ( void (GLCALLBACK*)(void *, void *) ) NULL;
- callbacks->end = ( void (GLCALLBACK*)(void) ) NULL;
- callbacks->endData = ( void (GLCALLBACK*)(void *) ) NULL;
- callbacks->error = ( void (GLCALLBACK*)(GLenum) ) NULL;
- callbacks->errorData = ( void (GLCALLBACK*)(GLenum, void *) ) NULL;
- callbacks->combine = ( void (GLCALLBACK*)(GLdouble [3], void *[4],
- GLfloat [4], void **) ) NULL;
- callbacks->combineData = ( void (GLCALLBACK*)(GLdouble [3], void *[4],
- GLfloat [4], void **,
- void *) ) NULL;
+ if (tobj->error == GLU_NO_ERROR && tobj->contour_cnt)
+ /* was gluEndPolygon called? */
+ tess_call_user_error(tobj, GLU_TESS_ERROR1);
+ /* delete all internal structures */
+ delete_contours(tobj);
+ free(tobj);
}
-/*****************************************************************************
- * tess_cleanup
- *****************************************************************************/
-static void tess_cleanup( GLUtesselator *tobj )
+void GLAPIENTRY
+gluBeginPolygon(GLUtriangulatorObj * tobj)
{
- DEBUGP( 15, ( " -> tess_cleanup( tobj:%p )\n", tobj ) );
-
- if ( tobj->current_contour != NULL ) {
- delete_current_contour( tobj );
- }
- if ( tobj->contours != NULL ) {
- delete_all_contours( tobj );
- }
-
- DEBUGP( 15, ( " <- tess_cleanup( tobj:%p )\n", tobj ) );
+/*
+ if(tobj->error!=GLU_NO_ERROR)
+ return;
+*/
+ tobj->error = GLU_NO_ERROR;
+ if (tobj->current_polygon != NULL) {
+ /* gluEndPolygon was not called */
+ tess_call_user_error(tobj, GLU_TESS_ERROR1);
+ /* delete all internal structures */
+ delete_contours(tobj);
+ }
+ else {
+ if ((tobj->current_polygon =
+ (tess_polygon *) malloc(sizeof(tess_polygon))) == NULL) {
+ tess_call_user_error(tobj, GLU_OUT_OF_MEMORY);
+ return;
+ }
+ tobj->current_polygon->vertex_cnt = 0;
+ tobj->current_polygon->vertices =
+ tobj->current_polygon->last_vertex = NULL;
+ }
}
-/*****************************************************************************
- * inspect_current_contour
- *****************************************************************************/
-static GLenum find_normal( GLUtesselator *tobj );
-static void project_current_contour( GLUtesselator *tobj );
-static GLenum save_current_contour( GLUtesselator *tobj );
-
-static void inspect_current_contour( GLUtesselator *tobj )
+void GLAPIENTRY
+gluEndPolygon(GLUtriangulatorObj * tobj)
{
- tess_contour_t *current = tobj->current_contour;
- GLdouble origin[3] = { 0.0, 0.0, 0.0 };
-
- DEBUGP( 15, ( " -> inspect_current_contour( tobj:%p )\n", tobj ) );
-
- if ( current->vertex_count < 3 )
- {
- DEBUGP( 15, ( " count %d < 3, deleting\n", current->vertex_count ) );
- delete_current_contour( tobj );
- return;
- }
-
- current->last_vertex->next = current->vertices;
- current->vertices->previous = current->last_vertex;
-
- if ( ( tobj->contours == NULL ) &&
- ( COMPARE_3DV( current->plane.normal, origin ) ) )
- {
- /* We haven't been given a normal, so let's take a guess. */
- if ( find_normal( tobj ) == GLU_ERROR ) {
- return;
- }
- COPY_3V( tobj->plane.normal, current->plane.normal );
- tobj->plane.dist = current->plane.dist;
- }
- else
- {
- DEBUGP( 15, ( " normal: (%.2f,%.2f,%.2f)\n", tobj->plane.normal[X], tobj->plane.normal[Y], tobj->plane.normal[Z] ) );
- }
-
- project_current_contour( tobj );
-
- if ( save_current_contour( tobj ) == GLU_ERROR ) {
- return;
- }
-
- DEBUGP( 15, ( " <- inspect_current_contour( tobj:%p )\n", tobj ) );
-}
-
-/*****************************************************************************
- * find_normal
- *****************************************************************************/
-static GLenum find_normal( GLUtesselator *tobj )
-{
- tess_contour_t *contour = tobj->current_contour;
- tess_vertex_t *va, *vb, *vc;
- GLdouble a[3], b[3], c[3];
-
- DEBUGP( 15, ( " -> find_normal( tobj:%p )\n", tobj ) );
-
- if ( contour == NULL ) { return GLU_ERROR; }
-
- va = contour->vertices;
- vb = va->next;
-
- /* If va and vb are the same point, keep looking for a different vertex. */
-
- while ( COMPARE_3DV( va->coords, vb->coords ) && ( vb != va ) ) {
- vb = vb->next;
- }
-
- if ( vb == va ) {
- DEBUGP( 0, ( "*** error 7 ***\n" ) );
- tess_error_callback( tobj, GLU_TESS_ERROR7 );
- }
-
- SUB_3V( a, vb->coords, va->coords );
-
- for ( vc = vb->next; vc != va; vc = vc->next )
- {
- SUB_3V( b, vc->coords, va->coords );
-
- CROSS3( c, a, b );
-
- if ( ( ABSD( c[X] ) > EQUAL_EPSILON ) ||
- ( ABSD( c[Y] ) > EQUAL_EPSILON ) ||
- ( ABSD( c[Z] ) > EQUAL_EPSILON ) )
- {
- COPY_3V( contour->plane.normal, c );
- NORMALIZE_3DV( contour->plane.normal );
-
- contour->plane.dist = - DOT3( contour->plane.normal, va->coords );
-
- DEBUGP( 15, ( " <- find_normal( tobj:%p ) n: (%.2f,%.2f,%.2f)\n", tobj, contour->plane.normal[X], contour->plane.normal[Y], contour->plane.normal[Z] ) );
- return GLU_NO_ERROR;
- }
- }
- DEBUGP( 0, ( "*** error 7 ***\n" ) );
- tess_error_callback( tobj, GLU_TESS_ERROR7 );
-
- return GLU_ERROR;
+ /*tess_contour *contour_ptr; */
+
+ /* there was an error */
+ if (tobj->error != GLU_NO_ERROR)
+ goto end;
+
+ /* check if gluBeginPolygon was called */
+ if (tobj->current_polygon == NULL) {
+ tess_call_user_error(tobj, GLU_TESS_ERROR2);
+ return;
+ }
+ tess_test_polygon(tobj);
+ /* there was an error */
+ if (tobj->error != GLU_NO_ERROR)
+ goto end;
+
+ /* any real contours? */
+ if (tobj->contour_cnt == 0) {
+ /* delete all internal structures */
+ delete_contours(tobj);
+ return;
+ }
+ tess_find_contour_hierarchies(tobj);
+ /* there was an error */
+ if (tobj->error != GLU_NO_ERROR)
+ goto end;
+
+ tess_handle_holes(tobj);
+ /* there was an error */
+ if (tobj->error != GLU_NO_ERROR)
+ goto end;
+
+ /* if no callbacks, nothing to do */
+ if (tobj->callbacks.begin != NULL && tobj->callbacks.vertex != NULL &&
+ tobj->callbacks.end != NULL) {
+ if (tobj->callbacks.edgeFlag == NULL)
+ tess_tesselate(tobj);
+ else
+ tess_tesselate_with_edge_flag(tobj);
+ }
+
+ end:
+ /* delete all internal structures */
+ delete_contours(tobj);
}
-/*****************************************************************************
- * project_current_contour
- *****************************************************************************/
-static GLdouble twice_contour_area( tess_vertex_t *vertex,
- tess_vertex_t *last_vertex );
-
-static void project_current_contour( GLUtesselator *tobj )
-{
- tess_contour_t *current = tobj->current_contour;
- tess_vertex_t *vertex;
- GLdouble area;
- GLdouble zaxis[3] = { 0.0, 0.0, 1.0 }, znormal[3], xnormal[3];
- GLdouble dot, rotx, roty;
- GLuint i;
-
- DEBUGP( 15, ( " -> project_current_contour( tobj:%p )\n", tobj ) );
-
- if ( current == NULL ) { return; }
-
- /* Rotate the plane normal around the y-axis. */
-
- znormal[X] = current->plane.normal[X];
- znormal[Y] = 0.0;
- znormal[Z] = current->plane.normal[Z];
-
- dot = DOT3( znormal, zaxis );
- current->roty = roty = acos( dot );
-
- /* Rotate the plane normal around the x-axis. */
-
- xnormal[X] = cos( roty ) * znormal[X] - sin( roty ) * znormal[Z];
- xnormal[Y] = znormal[Y];
- xnormal[Z] = sin( roty ) * znormal[X] + cos( roty ) * znormal[Z];
-
- dot = DOT3( xnormal, zaxis );
- current->rotx = rotx = acos( dot );
-
- for ( vertex = current->vertices, i = 0;
- i < current->vertex_count; vertex = vertex->next, i++ )
- {
- tess_plane_t *plane = ¤t->plane;
- GLdouble proj[3], yrot[3], xrot[3];
-
- /* FIXME: This needs a cleanup, 'cos I'm sure it's inefficient. */
-
- proj[X] = vertex->coords[X] - plane->dist * plane->normal[X];
- proj[Y] = vertex->coords[Y] - plane->dist * plane->normal[Y];
- proj[Z] = vertex->coords[Z] - plane->dist * plane->normal[Z];
-
- yrot[X] = cos( roty ) * proj[X] - sin( roty ) * proj[Z];
- yrot[Y] = proj[Y];
- yrot[Z] = sin( roty ) * proj[X] + cos( roty ) * proj[Z];
-
- xrot[X] = yrot[X];
- xrot[Y] = cos( rotx ) * yrot[Y] - sin( rotx ) * yrot[Z];
- xrot[Z] = sin( rotx ) * yrot[Y] + cos( rotx ) * yrot[Z];
-
- vertex->v[X] = xrot[X];
- vertex->v[Y] = xrot[Y];
-
- ACC_BBOX_2V( vertex->v, tobj->mins, tobj->maxs );
- ACC_BBOX_2V( vertex->v, current->mins, current->maxs );
- }
-
- area = twice_contour_area( current->vertices,
- current->last_vertex );
- if ( area >= 0.0 )
- {
- current->orientation = GLU_CCW;
- current->area = area;
- }
- else
- {
- current->orientation = GLU_CW;
- current->area = -area;
- }
-
- DEBUGP( 15, ( " <- project_current_contour( tobj:%p )\n", tobj ) );
-}
-/*****************************************************************************
- * twice_contour_area
- *****************************************************************************/
-static GLdouble twice_contour_area( tess_vertex_t *vertex,
- tess_vertex_t *last_vertex )
+void GLAPIENTRY
+gluNextContour(GLUtriangulatorObj * tobj, GLenum type)
{
- tess_vertex_t *next;
- GLdouble area, x, y;
-
- area = 0.0;
-
- x = vertex->v[X];
- y = vertex->v[Y];
-
- vertex = vertex->next;
-
- while ( vertex != last_vertex )
- {
- next = vertex->next;
- area +=
- (vertex->v[X] - x) * (next->v[Y] - y) -
- (vertex->v[Y] - y) * (next->v[X] - x);
-
- vertex = vertex->next;
- }
- return area;
+ if (tobj->error != GLU_NO_ERROR)
+ return;
+ if (tobj->current_polygon == NULL) {
+ tess_call_user_error(tobj, GLU_TESS_ERROR2);
+ return;
+ }
+ /* first contour? */
+ if (tobj->current_polygon->vertex_cnt)
+ tess_test_polygon(tobj);
}
-/*****************************************************************************
- * save_current_contour
- *****************************************************************************/
-static GLenum save_current_contour( GLUtesselator *tobj )
+void GLAPIENTRY
+gluTessVertex(GLUtriangulatorObj * tobj, GLdouble v[3], void *data)
{
- tess_contour_t *current = tobj->current_contour;
- tess_vertex_t *vertex;
- GLuint i;
-
- if ( current == NULL ) { return GLU_ERROR; }
-
- if ( tobj->contours == NULL )
- {
- tobj->contours = tobj->last_contour = current;
- current->next = current->previous = NULL;
- }
- else
- {
- current->previous = tobj->last_contour;
-
- tobj->last_contour->next = current;
- tobj->last_contour = current;
-
- current->next = NULL;
- }
-
- for ( vertex = current->vertices, i = 0;
- i < current->vertex_count; vertex = vertex->next, i++ )
- {
- vertex->shadow_vertex = NULL;
- vertex->edge_flag = GL_TRUE;
- }
-
- current->type = GLU_UNKNOWN;
-
- tobj->contour_count++;
- tobj->current_contour = NULL;
-
- return GLU_NO_ERROR;
+ tess_polygon *polygon = tobj->current_polygon;
+ tess_vertex *last_vertex_ptr;
+
+ if (tobj->error != GLU_NO_ERROR)
+ return;
+ if (polygon == NULL) {
+ tess_call_user_error(tobj, GLU_TESS_ERROR2);
+ return;
+ }
+ last_vertex_ptr = polygon->last_vertex;
+ if (last_vertex_ptr == NULL) {
+ if ((last_vertex_ptr = (tess_vertex *)
+ malloc(sizeof(tess_vertex))) == NULL) {
+ tess_call_user_error(tobj, GLU_OUT_OF_MEMORY);
+ return;
+ }
+ polygon->vertices = last_vertex_ptr;
+ polygon->last_vertex = last_vertex_ptr;
+ last_vertex_ptr->data = data;
+ last_vertex_ptr->location[0] = v[0];
+ last_vertex_ptr->location[1] = v[1];
+ last_vertex_ptr->location[2] = v[2];
+ last_vertex_ptr->next = NULL;
+ last_vertex_ptr->previous = NULL;
+ ++(polygon->vertex_cnt);
+ }
+ else {
+ tess_vertex *vertex_ptr;
+
+ /* same point twice? */
+ if (fabs(last_vertex_ptr->location[0] - v[0]) < EPSILON &&
+ fabs(last_vertex_ptr->location[1] - v[1]) < EPSILON &&
+ fabs(last_vertex_ptr->location[2] - v[2]) < EPSILON) {
+ tess_call_user_error(tobj, GLU_TESS_ERROR6);
+ return;
+ }
+ if ((vertex_ptr = (tess_vertex *)
+ malloc(sizeof(tess_vertex))) == NULL) {
+ tess_call_user_error(tobj, GLU_OUT_OF_MEMORY);
+ return;
+ }
+ vertex_ptr->data = data;
+ vertex_ptr->location[0] = v[0];
+ vertex_ptr->location[1] = v[1];
+ vertex_ptr->location[2] = v[2];
+ vertex_ptr->next = NULL;
+ vertex_ptr->previous = last_vertex_ptr;
+ ++(polygon->vertex_cnt);
+ last_vertex_ptr->next = vertex_ptr;
+ polygon->last_vertex = vertex_ptr;
+ }
}
-/*****************************************************************************
- * delete_current_contour
- *****************************************************************************/
-static void delete_current_contour( GLUtesselator *tobj )
-{
- tess_contour_t *current = tobj->current_contour;
- tess_vertex_t *vertex, *next;
- GLuint i;
-
- if ( current == NULL ) { return; }
-
- for ( vertex = current->vertices, i = 0; i < current->vertex_count; i++)
- {
- next = vertex->next;
- free( vertex );
- vertex = next;
- }
-
- free( current );
- tobj->current_contour = NULL;
-}
-/*****************************************************************************
- * delete_all_contours
- *****************************************************************************/
-static void delete_all_contours( GLUtesselator *tobj )
+static void
+delete_contours(GLUtriangulatorObj * tobj)
{
- tess_contour_t *current = tobj->current_contour, *next_contour;
- tess_vertex_t *vertex, *next_vertex;
- GLuint i;
-
- if ( current != NULL ) {
- delete_current_contour( tobj );
- }
-
- for ( current = tobj->contours, i = 0; i < tobj->contour_count; i++ )
- {
- vertex = current->vertices;
-
- while ( vertex != current->last_vertex )
- {
- next_vertex = vertex->next;
- free( vertex );
- vertex = next_vertex;
- }
- if ( vertex ) {
- free( vertex );
- }
- next_contour = current->next;
-
- free( current );
- current = next_contour;
- }
-
- tobj->contour_count = tobj->vertex_count = 0;
- tobj->contours = tobj->last_contour = NULL;
-
- CLEAR_BBOX_2DV( tobj->mins, tobj->maxs );
-
- ZERO_3V( tobj->plane.normal );
- tobj->plane.dist = 0.0;
+ tess_polygon *polygon = tobj->current_polygon;
+ tess_contour *contour, *contour_tmp;
+ tess_vertex *vertex, *vertex_tmp;
+
+ /* remove current_polygon list - if exists due to detected error */
+ if (polygon != NULL) {
+ if (polygon->vertices) {
+ for (vertex = polygon->vertices; vertex != polygon->last_vertex;) {
+ vertex_tmp = vertex->next;
+ free(vertex);
+ vertex = vertex_tmp;
+ }
+ free(vertex);
+ }
+ free(polygon);
+ tobj->current_polygon = NULL;
+ }
+ /* remove all contour data */
+ for (contour = tobj->contours; contour != NULL;) {
+ for (vertex = contour->vertices; vertex != contour->last_vertex;) {
+ vertex_tmp = vertex->next;
+ free(vertex);
+ vertex = vertex_tmp;
+ }
+ free(vertex);
+ contour_tmp = contour->next;
+ free(contour);
+ contour = contour_tmp;
+ }
+ tobj->contours = tobj->last_contour = NULL;
+ tobj->contour_cnt = 0;
}
-
-#ifdef DEBUG
-
-/*****************************************************************************
- * Debugging output
- *****************************************************************************/
-int tess_debug_level = 1;
-
-int vdebugstr( char *format_str, ... )
+void GLAPIENTRY
+gluTessNormal(GLUtesselator *tess, GLdouble valueX, GLdouble valueY, GLdouble valueZ)
{
- va_list ap;
- va_start( ap, format_str );
-
- vfprintf( DEBUG_STREAM, format_str, ap );
- va_end( ap );
- return 0;
+ /* dummy function */
+ (void) tess;
+ (void) valueX;
+ (void) valueY;
+ (void) valueZ;
}
-
-#endif