--- /dev/null
+/*\r
+Copyright (C) 1999-2007 id Software, Inc. and contributors.\r
+For a list of contributors, see the accompanying CONTRIBUTORS file.\r
+\r
+This file is part of GtkRadiant.\r
+\r
+GtkRadiant is free software; you can redistribute it and/or modify\r
+it under the terms of the GNU General Public License as published by\r
+the Free Software Foundation; either version 2 of the License, or\r
+(at your option) any later version.\r
+\r
+GtkRadiant is distributed in the hope that it will be useful,\r
+but WITHOUT ANY WARRANTY; without even the implied warranty of\r
+MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the\r
+GNU General Public License for more details.\r
+\r
+You should have received a copy of the GNU General Public License\r
+along with GtkRadiant; if not, write to the Free Software\r
+Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301 USA\r
+*/\r
+//\r
+// trilib.c: library for loading triangles from an Alias triangle file\r
+//\r
+\r
+#include <stdio.h>\r
+#include "cmdlib.h"\r
+#include "inout.h"\r
+#include "mathlib.h"\r
+#include "trilib.h"\r
+\r
+// on disk representation of a face\r
+\r
+\r
+#define FLOAT_START 99999.0\r
+#define FLOAT_END -FLOAT_START\r
+#define MAGIC 123322\r
+\r
+//#define NOISY 1\r
+\r
+typedef struct {\r
+ float v[3];\r
+} vector;\r
+\r
+typedef struct\r
+{\r
+ vector n; /* normal */\r
+ vector p; /* point */\r
+ vector c; /* color */\r
+ float u; /* u */\r
+ float v; /* v */\r
+} aliaspoint_t;\r
+\r
+typedef struct {\r
+ aliaspoint_t pt[3];\r
+} tf_triangle;\r
+\r
+\r
+void ByteSwapTri (tf_triangle *tri)\r
+{\r
+ int i;\r
+ \r
+ for (i=0 ; i<sizeof(tf_triangle)/4 ; i++)\r
+ {\r
+ ((int *)tri)[i] = BigLong (((int *)tri)[i]);\r
+ }\r
+}\r
+\r
+void LoadTriangleList (char *filename, triangle_t **pptri, int *numtriangles)\r
+{\r
+ FILE *input;\r
+ float start;\r
+ char name[256], tex[256];\r
+ int i, count, magic;\r
+ tf_triangle tri;\r
+ triangle_t *ptri;\r
+ int iLevel;\r
+ int exitpattern;\r
+ float t;\r
+\r
+ t = -FLOAT_START;\r
+ *((unsigned char *)&exitpattern + 0) = *((unsigned char *)&t + 3);\r
+ *((unsigned char *)&exitpattern + 1) = *((unsigned char *)&t + 2);\r
+ *((unsigned char *)&exitpattern + 2) = *((unsigned char *)&t + 1);\r
+ *((unsigned char *)&exitpattern + 3) = *((unsigned char *)&t + 0);\r
+\r
+ if ((input = fopen(filename, "rb")) == 0)\r
+ Error ("reader: could not open file '%s'", filename);\r
+\r
+ iLevel = 0;\r
+\r
+ fread(&magic, sizeof(int), 1, input);\r
+ if (BigLong(magic) != MAGIC)\r
+ Error ("%s is not a Alias object separated triangle file, magic number is wrong.", filename);\r
+\r
+ ptri = malloc (MAXTRIANGLES * sizeof(triangle_t));\r
+\r
+ *pptri = ptri;\r
+\r
+ while (feof(input) == 0) {\r
+ if (fread(&start, sizeof(float), 1, input) < 1)\r
+ break;\r
+ *(int *)&start = BigLong(*(int *)&start);\r
+ if (*(int *)&start != exitpattern)\r
+ {\r
+ if (start == FLOAT_START) {\r
+ /* Start of an object or group of objects. */\r
+ i = -1;\r
+ do {\r
+ /* There are probably better ways to read a string from */\r
+ /* a file, but this does allow you to do error checking */\r
+ /* (which I'm not doing) on a per character basis. */\r
+ ++i;\r
+ fread( &(name[i]), sizeof( char ), 1, input);\r
+ } while( name[i] != '\0' );\r
+ \r
+// indent();\r
+// fprintf(stdout,"OBJECT START: %s\n",name);\r
+ fread( &count, sizeof(int), 1, input);\r
+ count = BigLong(count);\r
+ ++iLevel;\r
+ if (count != 0) {\r
+// indent();\r
+// fprintf(stdout,"NUMBER OF TRIANGLES: %d\n",count);\r
+ \r
+ i = -1;\r
+ do {\r
+ ++i;\r
+ fread( &(tex[i]), sizeof( char ), 1, input);\r
+ } while( tex[i] != '\0' );\r
+ \r
+// indent();\r
+// fprintf(stdout," Object texture name: '%s'\n",tex);\r
+ }\r
+ \r
+ /* Else (count == 0) this is the start of a group, and */\r
+ /* no texture name is present. */\r
+ }\r
+ else if (start == FLOAT_END) {\r
+ /* End of an object or group. Yes, the name should be */\r
+ /* obvious from context, but it is in here just to be */\r
+ /* safe and to provide a little extra information for */\r
+ /* those who do not wish to write a recursive reader. */\r
+ /* Mia culpa. */\r
+ --iLevel;\r
+ i = -1;\r
+ do {\r
+ ++i;\r
+ fread( &(name[i]), sizeof( char ), 1, input);\r
+ } while( name[i] != '\0' );\r
+ \r
+// indent();\r
+// fprintf(stdout,"OBJECT END: %s\n",name);\r
+ continue;\r
+ }\r
+ }\r
+\r
+//\r
+// read the triangles\r
+// \r
+ for (i = 0; i < count; ++i) {\r
+ int j;\r
+\r
+ fread( &tri, sizeof(tf_triangle), 1, input );\r
+ ByteSwapTri (&tri);\r
+ for (j=0 ; j<3 ; j++)\r
+ {\r
+ int k;\r
+\r
+ for (k=0 ; k<3 ; k++)\r
+ {\r
+ ptri->verts[j][k] = tri.pt[j].p.v[k];\r
+ }\r
+ }\r
+\r
+ ptri++;\r
+\r
+ if ((ptri - *pptri) >= MAXTRIANGLES)\r
+ Error ("Error: too many triangles; increase MAXTRIANGLES\n");\r
+ }\r
+ }\r
+\r
+ *numtriangles = ptri - *pptri;\r
+\r
+ fclose (input);\r
+}\r
+\r