dropped all dependencies apart from SDL into the libs subdir
[summerhack] / libs / lib3ds / chunk.c
diff --git a/libs/lib3ds/chunk.c b/libs/lib3ds/chunk.c
new file mode 100644 (file)
index 0000000..75d51d0
--- /dev/null
@@ -0,0 +1,307 @@
+/*
+ * The 3D Studio File Format Library
+ * Copyright (C) 1996-2001 by J.E. Hoffmann <je-h@gmx.net>
+ * All rights reserved.
+ *
+ * This program is  free  software;  you can redistribute it and/or modify it
+ * under the terms of the  GNU Lesser General Public License  as published by 
+ * the  Free Software Foundation;  either version 2.1 of the License,  or (at 
+ * your option) any later version.
+ *
+ * This  program  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 Lesser General Public  
+ * License for more details.
+ *
+ * You should  have received  a copy of the GNU Lesser General Public License
+ * along with  this program;  if not, write to the  Free Software Foundation,
+ * Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
+ *
+ * $Id: chunk.c,v 1.14 2001/07/07 19:05:30 jeh Exp $
+ */
+#define LIB3DS_EXPORT
+#include <lib3ds/chunk.h>
+#include <lib3ds/io.h>
+#include <lib3ds/chunktable.h>
+#include <string.h>
+#include <stdarg.h>
+
+
+/*#define LIB3DS_CHUNK_DEBUG*/
+/*#define LIB3DS_CHUNK_WARNING*/
+
+
+/*!
+ * \defgroup chunk Chunk Handling
+ *
+ * \author J.E. Hoffmann <je-h@gmx.net>
+ */
+
+
+static Lib3dsBool enable_dump=LIB3DS_FALSE;
+static Lib3dsBool enable_unknown=LIB3DS_FALSE;
+static char lib3ds_chunk_level[128]="";
+
+
+static void
+lib3ds_chunk_debug_enter(Lib3dsChunk *c)
+{
+  strcat(lib3ds_chunk_level, "  ");
+}
+
+
+static void
+lib3ds_chunk_debug_leave(Lib3dsChunk *c)
+{
+  lib3ds_chunk_level[strlen(lib3ds_chunk_level)-2]=0;
+}
+
+
+static void
+lib3ds_chunk_debug_dump(Lib3dsChunk *c)
+{
+  if (enable_dump) {
+    printf("%s%s (0x%X) size=%lu\n",
+      lib3ds_chunk_level,
+      lib3ds_chunk_name(c->chunk),
+      c->chunk,
+      c->size
+    );
+  }
+}
+
+
+/*!
+ * \ingroup chunk
+ */
+void
+lib3ds_chunk_enable_dump(Lib3dsBool enable, Lib3dsBool unknown)
+{
+  enable_dump=enable;
+  enable_unknown=unknown;
+}
+
+
+/*!
+ * \ingroup chunk
+ *
+ * Reads a 3d-Studio chunk header from a little endian file stream.
+ *
+ * \param c  The chunk to store the data.
+ * \param f  The file stream.
+ *
+ * \return   True on success, False otherwise.
+ */
+Lib3dsBool
+lib3ds_chunk_read(Lib3dsChunk *c, Lib3dsIo *io)
+{
+  ASSERT(c);
+  ASSERT(io);
+  c->cur=lib3ds_io_tell(io);
+  c->chunk=lib3ds_io_read_word(io);
+  c->size=lib3ds_io_read_dword(io);
+  c->end=c->cur+c->size;
+  c->cur+=6;
+  if (lib3ds_io_error(io) || (c->size<6)) {
+    return(LIB3DS_FALSE);
+  }
+  return(LIB3DS_TRUE);
+  
+}
+
+
+/*!
+ * \ingroup chunk
+ */
+Lib3dsBool
+lib3ds_chunk_read_start(Lib3dsChunk *c, Lib3dsWord chunk, Lib3dsIo *io)
+{
+  ASSERT(c);
+  ASSERT(io);
+  if (!lib3ds_chunk_read(c, io)) {
+    return(LIB3DS_FALSE);
+  }
+  lib3ds_chunk_debug_enter(c);
+  return((chunk==0) || (c->chunk==chunk));
+}
+
+
+/*!
+ * \ingroup chunk
+ */
+void
+lib3ds_chunk_read_tell(Lib3dsChunk *c, Lib3dsIo *io)
+{
+  c->cur=lib3ds_io_tell(io);
+}
+
+
+/*!
+ * \ingroup chunk
+ */
+Lib3dsWord
+lib3ds_chunk_read_next(Lib3dsChunk *c, Lib3dsIo *io)
+{
+  Lib3dsChunk d;
+
+  if (c->cur>=c->end) {
+    ASSERT(c->cur==c->end);
+    return(0);
+  }
+
+  lib3ds_io_seek(io, (long)c->cur, LIB3DS_SEEK_SET);
+  d.chunk=lib3ds_io_read_word(io);
+  d.size=lib3ds_io_read_dword(io);
+  lib3ds_chunk_debug_dump(&d);
+  c->cur+=d.size;
+  return(d.chunk);
+}
+
+
+/*!
+ * \ingroup chunk
+ */
+void
+lib3ds_chunk_read_reset(Lib3dsChunk *c, Lib3dsIo *io)
+{
+  lib3ds_io_seek(io, -6, LIB3DS_SEEK_CUR);
+}
+
+
+/*!
+ * \ingroup chunk
+ */
+void
+lib3ds_chunk_read_end(Lib3dsChunk *c, Lib3dsIo *io)
+{
+  lib3ds_chunk_debug_leave(c);
+  lib3ds_io_seek(io, c->end, LIB3DS_SEEK_SET);
+}
+
+
+/*!
+ * \ingroup chunk
+ *
+ * Writes a 3d-Studio chunk header into a little endian file stream.
+ *
+ * \param c  The chunk to be written.
+ * \param f  The file stream.
+ *
+ * \return   True on success, False otherwise.
+ */
+Lib3dsBool
+lib3ds_chunk_write(Lib3dsChunk *c, Lib3dsIo *io)
+{
+  ASSERT(c);
+  if (!lib3ds_io_write_word(io, c->chunk)) {
+    LIB3DS_ERROR_LOG;
+    return(LIB3DS_FALSE);
+  }
+  if (!lib3ds_io_write_dword(io, c->size)) {
+    LIB3DS_ERROR_LOG;
+    return(LIB3DS_FALSE);
+  }
+  return(LIB3DS_TRUE);
+}
+
+
+/*!
+ * \ingroup chunk
+ */
+Lib3dsBool
+lib3ds_chunk_write_start(Lib3dsChunk *c, Lib3dsIo *io)
+{
+  ASSERT(c);
+  c->size=0;
+  c->cur=lib3ds_io_tell(io);
+  if (!lib3ds_io_write_word(io, c->chunk)) {
+    return(LIB3DS_FALSE);
+  }
+  if (!lib3ds_io_write_dword(io, c->size)) {
+    return(LIB3DS_FALSE);
+  }
+  return(LIB3DS_TRUE);
+}
+
+
+/*!
+ * \ingroup chunk
+ */
+Lib3dsBool
+lib3ds_chunk_write_end(Lib3dsChunk *c, Lib3dsIo *io)
+{
+  ASSERT(c);
+  c->size=lib3ds_io_tell(io) - c->cur;
+  lib3ds_io_seek(io, c->cur+2, LIB3DS_SEEK_SET);
+  if (!lib3ds_io_write_dword(io, c->size)) {
+    LIB3DS_ERROR_LOG;
+    return(LIB3DS_FALSE);
+  }
+
+  c->cur+=c->size;
+  lib3ds_io_seek(io, c->cur, LIB3DS_SEEK_SET);
+  if (lib3ds_io_error(io)) {
+    LIB3DS_ERROR_LOG;
+    return(LIB3DS_FALSE);
+  }
+  return(LIB3DS_TRUE);
+}
+
+
+/*!
+ * \ingroup chunk
+ */
+const char*
+lib3ds_chunk_name(Lib3dsWord chunk)
+{
+  Lib3dsChunkTable *p;
+
+  for (p=lib3ds_chunk_table; p->name!=0; ++p) {
+    if (p->chunk==chunk) {
+      return(p->name);
+    }
+  }
+  return("***UNKNOWN***");
+}
+
+
+/*!
+ * \ingroup chunk
+ */
+void
+lib3ds_chunk_unknown(Lib3dsWord chunk)
+{
+  if (enable_unknown) {
+    printf("%s***WARNING*** Unknown Chunk: %s (0x%X)\n",
+      lib3ds_chunk_level,
+      lib3ds_chunk_name(chunk),
+      chunk
+    );
+  }
+}
+
+
+/*!
+ * \ingroup chunk
+ */
+void 
+lib3ds_chunk_dump_info(const char *format, ...)
+{
+  if (enable_dump) {
+    char s[1024];
+    va_list marker;
+
+    va_start(marker, format);
+    vsprintf(s, format, marker);
+    va_end(marker);
+
+    printf("%s%s\n", lib3ds_chunk_level, s);
+  }
+}
+
+
+
+
+
+
+