update the version number to 1.0.2
[flac.git] / src / test_streams / main.c
index 3b7b4c6..dee0d53 100644 (file)
 #include <math.h>
 #include <stdio.h>
 #include <stdlib.h>
-#include <assert.h>
+#if !defined _MSC_VER && !defined __MINGW32__
 #include <sys/time.h>
+#endif
+#include "FLAC/assert.h"
 #include "FLAC/ordinals.h"
 
+#ifndef M_PI
+/* math.h in VC++ doesn't seem to have this (how Microsoft is that?) */
+#define M_PI 3.14159265358979323846
+#endif
+
 #ifdef _WIN32
        static const char *mode = "wb";
 #else
        static const char *mode = "w";
 #endif
 
-static bool is_big_endian_host;
+static FLAC__bool is_big_endian_host;
 
-static void swap16(int16 *i)
+/* some flavors of UNIX #define this */
+#ifdef swap16
+#undef swap16
+#endif
+static void swap16(FLAC__int16 *i)
 {
        unsigned char *x = (unsigned char *)i, b;
        if(!is_big_endian_host) {
@@ -41,7 +52,7 @@ static void swap16(int16 *i)
        }
 }
 
-static void swap24(byte *x)
+static void swap24(FLAC__byte *x)
 {
        if(is_big_endian_host) {
                x[0] = x[1];
@@ -49,17 +60,17 @@ static void swap24(byte *x)
                x[2] = x[3];
        }
        else {
-               byte b = x[0];
+               FLAC__byte b = x[0];
                x[0] = x[2];
                x[2] = b;
        }
 }
 
 /* a mono one-sample 16bps stream */
-static bool generate_01()
+static FLAC__bool generate_01()
 {
        FILE *f;
-       int16 x = -32768;
+       FLAC__int16 x = -32768;
 
        if(0 == (f = fopen("test01.raw", mode)))
                return false;
@@ -76,10 +87,10 @@ foo:
 }
 
 /* a stereo one-sample 16bps stream */
-static bool generate_02()
+static FLAC__bool generate_02()
 {
        FILE *f;
-       int16 xl = -32768, xr = 32767;
+       FLAC__int16 xl = -32768, xr = 32767;
 
        if(0 == (f = fopen("test02.raw", mode)))
                return false;
@@ -100,10 +111,10 @@ foo:
 }
 
 /* a mono five-sample 16bps stream */
-static bool generate_03()
+static FLAC__bool generate_03()
 {
        FILE *f;
-       int16 x[] = { -25, 0, 25, 50, 100 };
+       FLAC__int16 x[] = { -25, 0, 25, 50, 100 };
        unsigned i;
 
        if(0 == (f = fopen("test03.raw", mode)))
@@ -112,7 +123,7 @@ static bool generate_03()
        for(i = 0; i < 5; i++)
                swap16(x+i);
 
-       if(fwrite(&x, sizeof(int16), 5, f) < 5)
+       if(fwrite(&x, sizeof(FLAC__int16), 5, f) < 5)
                goto foo;
 
        fclose(f);
@@ -123,10 +134,10 @@ foo:
 }
 
 /* a stereo five-sample 16bps stream */
-static bool generate_04()
+static FLAC__bool generate_04()
 {
        FILE *f;
-       int16 x[] = { -25, 500, 0, 400, 25, 300, 50, 200, 100, 100 };
+       FLAC__int16 x[] = { -25, 500, 0, 400, 25, 300, 50, 200, 100, 100 };
        unsigned i;
 
        if(0 == (f = fopen("test04.raw", mode)))
@@ -135,7 +146,7 @@ static bool generate_04()
        for(i = 0; i < 10; i++)
                swap16(x+i);
 
-       if(fwrite(&x, sizeof(int16), 10, f) < 10)
+       if(fwrite(&x, sizeof(FLAC__int16), 10, f) < 10)
                goto foo;
 
        fclose(f);
@@ -146,12 +157,12 @@ foo:
 }
 
 /* a mono full-scale deflection 8bps stream */
-static bool generate_fsd8(const char *fn, const int pattern[], unsigned reps)
+static FLAC__bool generate_fsd8(const char *fn, const int pattern[], unsigned reps)
 {
        FILE *f;
        unsigned rep, p;
 
-       assert(pattern != 0);
+       FLAC__ASSERT(pattern != 0);
 
        if(0 == (f = fopen(fn, mode)))
                return false;
@@ -172,19 +183,19 @@ foo:
 }
 
 /* a mono full-scale deflection 16bps stream */
-static bool generate_fsd16(const char *fn, const int pattern[], unsigned reps)
+static FLAC__bool generate_fsd16(const char *fn, const int pattern[], unsigned reps)
 {
        FILE *f;
        unsigned rep, p;
 
-       assert(pattern != 0);
+       FLAC__ASSERT(pattern != 0);
 
        if(0 == (f = fopen(fn, mode)))
                return false;
 
        for(rep = 0; rep < reps; rep++) {
                for(p = 0; pattern[p]; p++) {
-                       int16 x = pattern[p] > 0? 32767 : -32768;
+                       FLAC__int16 x = pattern[p] > 0? 32767 : -32768;
                        swap16(&x);
                        if(fwrite(&x, sizeof(x), 1, f) < 1)
                                goto foo;
@@ -198,21 +209,48 @@ foo:
        return false;
 }
 
+/* a stereo wasted-bits-per-sample 16bps stream */
+static FLAC__bool generate_wbps16(const char *fn, unsigned samples)
+{
+       FILE *f;
+       unsigned sample;
+
+       if(0 == (f = fopen(fn, mode)))
+               return false;
+
+       for(sample = 0; sample < samples; sample++) {
+               FLAC__int16 l = (sample % 2000) << 2;
+               FLAC__int16 r = (sample % 1000) << 3;
+               swap16(&l);
+               swap16(&r);
+               if(fwrite(&l, sizeof(l), 1, f) < 1)
+                       goto foo;
+               if(fwrite(&r, sizeof(r), 1, f) < 1)
+                       goto foo;
+       }
+
+       fclose(f);
+       return true;
+foo:
+       fclose(f);
+       return false;
+}
+
 /* a mono full-scale deflection 24bps stream */
-static bool generate_fsd24(const char *fn, const int pattern[], unsigned reps)
+static FLAC__bool generate_fsd24(const char *fn, const int pattern[], unsigned reps)
 {
        FILE *f;
        unsigned rep, p;
 
-       assert(pattern != 0);
+       FLAC__ASSERT(pattern != 0);
 
        if(0 == (f = fopen(fn, mode)))
                return false;
 
        for(rep = 0; rep < reps; rep++) {
                for(p = 0; pattern[p]; p++) {
-                       int32 x = pattern[p] > 0? 8388607 : -8388608;
-                       byte *b = (byte*)(&x);
+                       FLAC__int32 x = pattern[p] > 0? 8388607 : -8388608;
+                       FLAC__byte *b = (FLAC__byte*)(&x);
                        swap24(b);
                        if(fwrite(b, 3, 1, f) < 1)
                                goto foo;
@@ -227,9 +265,9 @@ foo:
 }
 
 /* a mono sine-wave 16bps stream */
-static bool generate_sine16_1(const char *fn, const double sample_rate, const unsigned samples, const double f1, const double a1, const double f2, const double a2)
+static FLAC__bool generate_sine16_1(const char *fn, const double sample_rate, const unsigned samples, const double f1, const double a1, const double f2, const double a2)
 {
-       const int16 full_scale = 32767;
+       const FLAC__int16 full_scale = 32767;
        const double delta1 = 2.0 * M_PI / ( sample_rate / f1);
        const double delta2 = 2.0 * M_PI / ( sample_rate / f2);
        FILE *f;
@@ -241,7 +279,7 @@ static bool generate_sine16_1(const char *fn, const double sample_rate, const un
 
        for(i = 0, theta1 = theta2 = 0.0; i < samples; i++, theta1 += delta1, theta2 += delta2) {
                double val = (a1*sin(theta1) + a2*sin(theta2))*(double)full_scale;
-               int16 v = (int16)(val + 0.5);
+               FLAC__int16 v = (FLAC__int16)(val + 0.5);
                swap16(&v);
                if(fwrite(&v, sizeof(v), 1, f) < 1)
                        goto foo;
@@ -255,9 +293,9 @@ foo:
 }
 
 /* a stereo sine-wave 16bps stream */
-static bool generate_sine16_2(const char *fn, const double sample_rate, const unsigned samples, const double f1, const double a1, const double f2, const double a2, double fmult)
+static FLAC__bool generate_sine16_2(const char *fn, const double sample_rate, const unsigned samples, const double f1, const double a1, const double f2, const double a2, double fmult)
 {
-       const int16 full_scale = 32767;
+       const FLAC__int16 full_scale = 32767;
        const double delta1 = 2.0 * M_PI / ( sample_rate / f1);
        const double delta2 = 2.0 * M_PI / ( sample_rate / f2);
        FILE *f;
@@ -269,12 +307,12 @@ static bool generate_sine16_2(const char *fn, const double sample_rate, const un
 
        for(i = 0, theta1 = theta2 = 0.0; i < samples; i++, theta1 += delta1, theta2 += delta2) {
                double val = (a1*sin(theta1) + a2*sin(theta2))*(double)full_scale;
-               int16 v = (int16)(val + 0.5);
+               FLAC__int16 v = (FLAC__int16)(val + 0.5);
                swap16(&v);
                if(fwrite(&v, sizeof(v), 1, f) < 1)
                        goto foo;
                val = -(a1*sin(theta1*fmult) + a2*sin(theta2*fmult))*(double)full_scale;
-               v = (int16)(val + 0.5);
+               v = (FLAC__int16)(val + 0.5);
                swap16(&v);
                if(fwrite(&v, sizeof(v), 1, f) < 1)
                        goto foo;
@@ -288,9 +326,9 @@ foo:
 }
 
 /* a mono sine-wave 24bps stream */
-static bool generate_sine24_1(const char *fn, const double sample_rate, const unsigned samples, const double f1, const double a1, const double f2, const double a2)
+static FLAC__bool generate_sine24_1(const char *fn, const double sample_rate, const unsigned samples, const double f1, const double a1, const double f2, const double a2)
 {
-       const int32 full_scale = 0x7fffff;
+       const FLAC__int32 full_scale = 0x7fffff;
        const double delta1 = 2.0 * M_PI / ( sample_rate / f1);
        const double delta2 = 2.0 * M_PI / ( sample_rate / f2);
        FILE *f;
@@ -302,8 +340,8 @@ static bool generate_sine24_1(const char *fn, const double sample_rate, const un
 
        for(i = 0, theta1 = theta2 = 0.0; i < samples; i++, theta1 += delta1, theta2 += delta2) {
                double val = (a1*sin(theta1) + a2*sin(theta2))*(double)full_scale;
-               int32 v = (int32)(val + 0.5);
-               byte *b = (byte*)(&v);
+               FLAC__int32 v = (FLAC__int32)(val + 0.5);
+               FLAC__byte *b = (FLAC__byte*)(&v);
                swap24(b);
                if(fwrite(b, 3, 1, f) < 1)
                        goto foo;
@@ -317,9 +355,9 @@ foo:
 }
 
 /* a stereo sine-wave 24bps stream */
-static bool generate_sine24_2(const char *fn, const double sample_rate, const unsigned samples, const double f1, const double a1, const double f2, const double a2, double fmult)
+static FLAC__bool generate_sine24_2(const char *fn, const double sample_rate, const unsigned samples, const double f1, const double a1, const double f2, const double a2, double fmult)
 {
-       const int32 full_scale = 0x7fffff;
+       const FLAC__int32 full_scale = 0x7fffff;
        const double delta1 = 2.0 * M_PI / ( sample_rate / f1);
        const double delta2 = 2.0 * M_PI / ( sample_rate / f2);
        FILE *f;
@@ -331,13 +369,13 @@ static bool generate_sine24_2(const char *fn, const double sample_rate, const un
 
        for(i = 0, theta1 = theta2 = 0.0; i < samples; i++, theta1 += delta1, theta2 += delta2) {
                double val = (a1*sin(theta1) + a2*sin(theta2))*(double)full_scale;
-               int32 v = (int32)(val + 0.5);
-               byte *b = (byte*)(&v);
+               FLAC__int32 v = (FLAC__int32)(val + 0.5);
+               FLAC__byte *b = (FLAC__byte*)(&v);
                swap24(b);
                if(fwrite(b, 3, 1, f) < 1)
                        goto foo;
                val = -(a1*sin(theta1*fmult) + a2*sin(theta2*fmult))*(double)full_scale;
-               v = (int32)(val + 0.5);
+               v = (FLAC__int32)(val + 0.5);
                swap24(b);
                if(fwrite(b, 3, 1, f) < 1)
                        goto foo;
@@ -350,23 +388,31 @@ foo:
        return false;
 }
 
-static bool generate_noise(const char *fn, unsigned bytes)
+static FLAC__bool generate_noise(const char *fn, unsigned bytes)
 {
        FILE *f;
-       struct timeval tv;
        unsigned b;
+#if !defined _MSC_VER && !defined __MINGW32__
+       struct timeval tv;
 
        if(gettimeofday(&tv, 0) < 0) {
                fprintf(stderr, "WARNING: couldn't seed RNG with time\n");
                tv.tv_usec = 4321;
        }
        srandom(tv.tv_usec);
+#else
+       /* who has the patience to figure out how to do RNG with VC++? */
+#endif
 
        if(0 == (f = fopen(fn, mode)))
                return false;
 
        for(b = 0; b < bytes; b++) {
-               byte x = (byte)(((unsigned)random()) & 0xff);
+#if !defined _MSC_VER && !defined __MINGW32__
+               FLAC__byte x = (FLAC__byte)(((unsigned)random()) & 0xff);
+#else
+               FLAC__byte x = (FLAC__byte)((((unsigned)generate_noise) >> 8) ^ (b * 17)); /* fake it */
+#endif
                if(fwrite(&x, sizeof(x), 1, f) < 1)
                        goto foo;
        }
@@ -378,9 +424,46 @@ foo:
        return false;
 }
 
+static FLAC__bool generate_wackywavs()
+{
+       FILE *f;
+       FLAC__byte wav[] = {
+               'R', 'I', 'F', 'F',  76,   0,   0,   0,
+               'W', 'A', 'V', 'E', 'f', 'a', 'c', 't',
+                 4,   0,   0,  0 , 'b', 'l', 'a', 'h',
+               'p', 'a', 'd', ' ',   4,   0,   0,   0,
+               'B', 'L', 'A', 'H', 'f', 'm', 't', ' ',
+                16,   0,   0,   0,   1,   0,   1,   0,
+               0x44,0xAC,  0,   0,   0,   0,   0,   0,
+                 2,   0,  16,   0, 'd', 'a', 't', 'a',
+                16,   0,   0,   0,   0,   0,   1,   0,
+                 4,   0,   9,   0,  16,   0,  25,   0,
+                36,   0,  49,   0, 'p', 'a', 'd', ' ',
+                 4,   0,   0,   0, 'b', 'l', 'a', 'h'
+       };
+
+       if(0 == (f = fopen("wacky1.wav", mode)))
+               return false;
+       if(fwrite(wav, 1, 84, f) < 84)
+               goto foo;
+       fclose(f);
+
+       wav[4] += 12;
+       if(0 == (f = fopen("wacky2.wav", mode)))
+               return false;
+       if(fwrite(wav, 1, 96, f) < 96)
+               goto foo;
+       fclose(f);
+
+       return true;
+foo:
+       fclose(f);
+       return false;
+}
+
 int main(int argc, char *argv[])
 {
-       uint32 test = 1;
+       FLAC__uint32 test = 1;
 
        int pattern01[] = { 1, -1, 0 };
        int pattern02[] = { 1, 1, -1, 0 };
@@ -392,7 +475,7 @@ int main(int argc, char *argv[])
 
        (void)argc;
        (void)argv;
-       is_big_endian_host = (*((byte*)(&test)))? false : true;
+       is_big_endian_host = (*((FLAC__byte*)(&test)))? false : true;
 
        if(!generate_01()) return 1;
        if(!generate_02()) return 1;
@@ -423,6 +506,8 @@ int main(int argc, char *argv[])
        if(!generate_fsd24("fsd24-06.raw", pattern06, 100)) return 1;
        if(!generate_fsd24("fsd24-07.raw", pattern07, 100)) return 1;
 
+       if(!generate_wbps16("wbps16-01.raw", 1000)) return 1;
+
        if(!generate_sine16_1("sine16-00.raw", 44100.0, 80000, 441.0, 0.50, 441.0, 0.49)) return 1;
        if(!generate_sine16_1("sine16-01.raw", 44100.0, 80000, 441.0, 0.61, 661.5, 0.37)) return 1;
        if(!generate_sine16_1("sine16-02.raw", 44100.0, 80000, 441.0, 0.50, 882.0, 0.49)) return 1;
@@ -458,6 +543,7 @@ int main(int argc, char *argv[])
        if(!generate_sine24_2("sine24-19.raw", 44100.0, 50000, 8820.0, 0.70, 4410.0, 0.29, 0.1)) return 1;
 
        if(!generate_noise("noise.raw", 65536 * 8 * 3)) return 1;
+       if(!generate_wackywavs()) return 1;
 
        return 0;
 }