Include toolame-dab as library

1 files changed, 110 insertions, 0 deletions

diff --git a/libtoolame-dab/portableio.c b/libtoolame-dab/portableio.c
new file mode 100644
index 0000000..ed4c067
--- /dev/null
+++ b/libtoolame-dab/portableio.c
@@ -0,0 +1,110 @@
+/* Copyright (C) 1988-1991 Apple Computer, Inc.
+ * All Rights Reserved.
+ *
+ * Warranty Information
+ * Even though Apple has reviewed this software, Apple makes no warranty
+ * or representation, either express or implied, with respect to this
+ * software, its quality, accuracy, merchantability, or fitness for a 
+ * particular purpose.  As a result, this software is provided "as is,"
+ * and you, its user, are assuming the entire risk as to its quality
+ * and accuracy.
+ *
+ * This code may be used and freely distributed as long as it includes
+ * this copyright notice and the warranty information.
+ *
+ *
+ * Motorola processors (Macintosh, Sun, Sparc, MIPS, etc)
+ * pack bytes from high to low (they are big-endian).
+ * Use the HighLow routines to match the native format
+ * of these machines.
+ *
+ * Intel-like machines (PCs, Sequent)
+ * pack bytes from low to high (the are little-endian).
+ * Use the LowHigh routines to match the native format
+ * of these machines.
+ *
+ * These routines have been tested on the following machines:
+ *	Apple Macintosh, MPW 3.1 C compiler
+ *	Apple Macintosh, THINK C compiler
+ *	Silicon Graphics IRIS, MIPS compiler
+ *	Cray X/MP and Y/MP
+ *	Digital Equipment VAX
+ *
+ *
+ * Implemented by Malcolm Slaney and Ken Turkowski.
+ *
+ * Malcolm Slaney contributions during 1988-1990 include big- and little-
+ * endian file I/O, conversion to and from Motorola's extended 80-bit
+ * FLOATing-point format, and conversions to and from IEEE single-
+ * precision FLOATing-point format.
+ *
+ * In 1991, Ken Turkowski implemented the conversions to and from
+ * IEEE double-precision format, added more precision to the extended
+ * conversions, and accommodated conversions involving +/- infinity,
+ * NaN's, and denormalized numbers.
+ *
+ * $Id: portableio.c,v 2.6 1991/04/30 17:06:02 malcolm Exp $
+ *
+ * $Log: portableio.c,v $
+ * Revision 2.6  91/04/30  17:06:02  malcolm
+ * Apr 2000
+ *       MFC - hacked out everything we don't need for layer II 
+ */
+
+#include	<stdio.h>
+#include	<math.h>
+#include	"portableio.h"
+#include "common.h"
+
+/****************************************************************
+ * Big/little-endian independent I/O routines.
+ ****************************************************************/
+int Read16BitsHighLow (fp)
+     FILE *fp;
+{
+  int first, second, result;
+
+  first = 0xff & getc (fp);
+  second = 0xff & getc (fp);
+
+  result = (first << 8) + second;
+#ifndef	THINK_C42
+  if (result & 0x8000)
+    result = result - 0x10000;
+#endif /* THINK_C */
+  return (result);
+}
+
+double ReadIeeeExtendedHighLow (fp)
+     FILE *fp;
+{
+  char bits[kExtendedLength];
+
+  ReadBytes (fp, bits, kExtendedLength);
+  return ConvertFromIeeeExtended (bits);
+}
+
+int Read32BitsHighLow (fp)
+     FILE *fp;
+{
+  int first, second, result;
+
+  first = 0xffff & Read16BitsHighLow (fp);
+  second = 0xffff & Read16BitsHighLow (fp);
+
+  result = (first << 16) + second;
+#ifdef	CRAY
+  if (result & 0x80000000)
+    result = result - 0x100000000;
+#endif
+  return (result);
+}
+
+void ReadBytes (fp, p, n)
+     FILE *fp;
+     char *p;
+     int n;
+{
+  while (!feof (fp) & (n-- > 0))
+    *p++ = getc (fp);
+}