]> git.xonotic.org Git - xonotic/netradiant.git/blobdiff - tools/quake2/common/trilib.c
transfer from internal tree r5311 branches/1.4-gpl
[xonotic/netradiant.git] / tools / quake2 / common / trilib.c
diff --git a/tools/quake2/common/trilib.c b/tools/quake2/common/trilib.c
new file mode 100644 (file)
index 0000000..11f718f
--- /dev/null
@@ -0,0 +1,186 @@
+/*\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