aboutsummaryrefslogtreecommitdiff
path: root/Src/Winamp/plush/READ_COB.C
diff options
context:
space:
mode:
Diffstat (limited to 'Src/Winamp/plush/READ_COB.C')
-rw-r--r--Src/Winamp/plush/READ_COB.C182
1 files changed, 182 insertions, 0 deletions
diff --git a/Src/Winamp/plush/READ_COB.C b/Src/Winamp/plush/READ_COB.C
new file mode 100644
index 00000000..20233d20
--- /dev/null
+++ b/Src/Winamp/plush/READ_COB.C
@@ -0,0 +1,182 @@
+/******************************************************************************
+Plush Version 1.2
+read_cob.c
+ASCII COB Object Reader
+Copyright (c) 1996-2000, Justin Frankel
+******************************************************************************/
+
+#include "plush.h"
+
+#define PL_COB_MAX_LINELENGTH 1024
+
+pl_Obj *plReadCOBObj(char *fn, pl_Mat *mat) {
+ FILE *fp = fopen(fn,"rt");
+ long int p1,m1,p2,m2,p3,m3;
+ char temp_string[PL_COB_MAX_LINELENGTH];
+ float TransMatrix[4][4];
+ pl_Obj *obj;
+ pl_sInt32 x,i2;
+ long int numVertices, numMappingVertices, numFaces, i;
+ pl_sInt32 *MappingVertices = 0;
+ if (!fp) return 0;
+
+ fgets(temp_string,PL_COB_MAX_LINELENGTH,fp);
+ if (memcmp("Caligari",temp_string,8)) { fclose(fp); return 0; }
+
+ do {
+ fgets(temp_string,PL_COB_MAX_LINELENGTH,fp);
+ } while (!feof(fp) && memcmp("Transform",temp_string,9));
+ if (feof(fp)) { fclose(fp); return 0; }
+ fgets(temp_string,PL_COB_MAX_LINELENGTH,fp);
+ sscanf(temp_string,"%f %f %f %f",
+ &TransMatrix[0][0],&TransMatrix[0][1],&TransMatrix[0][2],&TransMatrix[0][3]);
+ fgets(temp_string,PL_COB_MAX_LINELENGTH,fp);
+ sscanf(temp_string,"%f %f %f %f",
+ &TransMatrix[1][0],&TransMatrix[1][1],&TransMatrix[1][2],&TransMatrix[1][3]);
+ fgets(temp_string,PL_COB_MAX_LINELENGTH,fp);
+ sscanf(temp_string,"%f %f %f %f",
+ &TransMatrix[2][0],&TransMatrix[2][1],&TransMatrix[2][2],&TransMatrix[2][3]);
+ fgets(temp_string,PL_COB_MAX_LINELENGTH,fp);
+ sscanf(temp_string,"%f %f %f %f",
+ &TransMatrix[3][0],&TransMatrix[3][1],&TransMatrix[3][2],&TransMatrix[3][3]);
+
+ do {
+ fgets(temp_string,PL_COB_MAX_LINELENGTH,fp);
+ } while (!feof(fp) && memcmp("World Vertices",temp_string,12));
+ if (feof(fp) || sscanf(temp_string,"World Vertices %ld",&numVertices) != 1)
+ { fclose(fp); return 0; }
+
+ rewind(fp);
+ do {
+ fgets(temp_string,PL_COB_MAX_LINELENGTH,fp);
+ } while (!feof(fp) && memcmp("Texture Vertices",temp_string,16));
+ if (feof(fp) ||
+ sscanf(temp_string,"Texture Vertices %ld",&numMappingVertices) != 1) {
+ fclose(fp); return 0;
+ }
+
+ rewind(fp);
+ do {
+ fgets(temp_string,PL_COB_MAX_LINELENGTH,fp);
+ } while (!feof(fp) && memcmp("Faces",temp_string,5));
+ if (feof(fp) || sscanf(temp_string,"Faces %ld",&numFaces) != 1) {
+ fclose(fp); return 0;
+ }
+ for (x = numFaces; x; x--) {
+ fgets(temp_string,PL_COB_MAX_LINELENGTH,fp);
+ if (feof(fp) || sscanf(temp_string+4," verts %ld",&i) != 1 || i < 3) {
+ fclose(fp);
+ return 0;
+ }
+ numFaces += i-3;
+ fgets(temp_string,PL_COB_MAX_LINELENGTH,fp);
+ }
+ obj = plObjCreate(numVertices,numFaces);
+ if (!obj) { fclose(fp); return 0; }
+ rewind(fp);
+ do {
+ fgets(temp_string,PL_COB_MAX_LINELENGTH,fp);
+ } while (!feof(fp) && memcmp("World Vertices",temp_string,12));
+ if (feof(fp)) { plObjDelete(obj); fclose(fp); return 0; }
+ for (x = 0; x < numVertices; x ++) {
+ float xp, yp, zp;
+ fgets(temp_string,PL_COB_MAX_LINELENGTH,fp);
+ if (feof(fp) ||
+ sscanf(temp_string,"%f %f %f", &xp, &yp, &zp) != 3) {
+ plObjDelete(obj); fclose(fp); return 0;
+ }
+ obj->Vertices[x].x = (TransMatrix[0][0]*xp+TransMatrix[0][1]*yp+
+ TransMatrix[0][2]*zp+TransMatrix[0][3]);
+ obj->Vertices[x].y = (TransMatrix[1][0]*xp+TransMatrix[1][1]*yp+
+ TransMatrix[1][2]*zp+TransMatrix[1][3]);
+ obj->Vertices[x].z = (TransMatrix[2][0]*xp+TransMatrix[2][1]*yp+
+ TransMatrix[2][2]*zp+TransMatrix[2][3]);
+ }
+ rewind(fp);
+ do {
+ fgets(temp_string,PL_COB_MAX_LINELENGTH,fp);
+ } while (!feof(fp) && memcmp("Texture Vertices",temp_string,16));
+ if (!feof(fp)) {
+ MappingVertices = (pl_sInt32 *)
+ malloc(sizeof(pl_sInt32) * numMappingVertices * 2);
+ if (MappingVertices) {
+ for (x = 0; x < numMappingVertices; x ++) {
+ float p1, p2;
+ fgets(temp_string,PL_COB_MAX_LINELENGTH,fp);
+ if (feof(fp) || sscanf(temp_string,"%f %f", &p1, &p2) != 2) {
+ free(MappingVertices); plObjDelete(obj); fclose(fp); return 0;
+ }
+ MappingVertices[x*2] = (pl_sInt32) (p1*65536.0);
+ MappingVertices[x*2+1] = (pl_sInt32) (p2*65536.0);
+ }
+ }
+ }
+ rewind(fp);
+ do {
+ fgets(temp_string,PL_COB_MAX_LINELENGTH,fp);
+ } while (!feof(fp) && memcmp("Faces",temp_string,5));
+ if (feof(fp)) {
+ if (MappingVertices) free(MappingVertices);
+ plObjDelete(obj); fclose(fp); return 0;
+ }
+ for (x = 0; x < numFaces; x ++) {
+ fgets(temp_string,PL_COB_MAX_LINELENGTH,fp);
+ sscanf(temp_string+4," verts %ld",&i);
+ fgets(temp_string,PL_COB_MAX_LINELENGTH,fp);
+ if (i == 3) {
+ if (feof(fp) || sscanf(temp_string,"<%ld,%ld> <%ld,%ld> <%ld,%ld>",
+ &p3,&m3,&p2,&m2,&p1,&m1) != 6) {
+ if (MappingVertices) free(MappingVertices);
+ plObjDelete(obj); fclose(fp); return 0;
+ }
+ obj->Faces[x].Vertices[0] = obj->Vertices + p1;
+ obj->Faces[x].Vertices[1] = obj->Vertices + p2;
+ obj->Faces[x].Vertices[2] = obj->Vertices + p3;
+ if (MappingVertices) {
+ obj->Faces[x].MappingU[0] = MappingVertices[m1*2];
+ obj->Faces[x].MappingV[0] = MappingVertices[m1*2+1];
+ obj->Faces[x].MappingU[1] = MappingVertices[m2*2];
+ obj->Faces[x].MappingV[1] = MappingVertices[m2*2+1];
+ obj->Faces[x].MappingU[2] = MappingVertices[m3*2];
+ obj->Faces[x].MappingV[2] = MappingVertices[m3*2+1];
+ }
+ obj->Faces[x].Material = mat;
+ } else {
+ long int p[16],m[16];
+ if (feof(fp)) {
+ if (MappingVertices) free(MappingVertices);
+ plObjDelete(obj); fclose(fp); return 0;
+ }
+ sscanf(temp_string,
+ "<%ld,%ld> <%ld,%ld> <%ld,%ld> <%ld,%ld> "
+ "<%ld,%ld> <%ld,%ld> <%ld,%ld> <%ld,%ld> "
+ "<%ld,%ld> <%ld,%ld> <%ld,%ld> <%ld,%ld> "
+ "<%ld,%ld> <%ld,%ld> <%ld,%ld> <%ld,%ld> ",
+ p+0,m+0,p+1,m+1,p+2,m+2,p+3,m+3,
+ p+4,m+4,p+5,m+5,p+6,m+6,p+7,m+7,
+ p+8,m+8,p+9,m+9,p+10,m+10,p+11,m+11,
+ p+12,m+12,p+13,m+13,p+14,m+14,p+15,m+15);
+ for (i2 = 1; i2 < (i-1); i2 ++) {
+ obj->Faces[x].Vertices[0] = obj->Vertices + p[0];
+ obj->Faces[x].Vertices[1] = obj->Vertices + p[i2+1];
+ obj->Faces[x].Vertices[2] = obj->Vertices + p[i2];
+ if (MappingVertices) {
+ obj->Faces[x].MappingU[0] = MappingVertices[m[0]*2];
+ obj->Faces[x].MappingV[0] = MappingVertices[m[0]*2+1];
+ obj->Faces[x].MappingU[1] = MappingVertices[m[i2+1]*2];
+ obj->Faces[x].MappingV[1] = MappingVertices[m[i2+1]*2+1];
+ obj->Faces[x].MappingU[2] = MappingVertices[m[i2]*2];
+ obj->Faces[x].MappingV[2] = MappingVertices[m[i2]*2+1];
+ }
+ obj->Faces[x].Material = mat;
+ x++;
+ }
+ x--;
+ }
+ }
+ obj->BackfaceCull = 1;
+ if (MappingVertices) free(MappingVertices);
+ plObjCalcNormals(obj);
+ fclose(fp);
+ return obj;
+}
generated by cgit (git 2.34.1) at 2025-05-10 17:55:29 -0400